Ответы на вопрос:
Объяснение:
10
12 ТАК КАК ПРИ СЛОЖЕНИИ ДОЛЖНО ПОЛУЧИТСЯ ТАК НЕ КАК ИНАЧЕ
1)
var
a, b, c: real;
ide: boolean;
begin
ide: = false;
writeln('введите 2 числа');
readln(a, b);
c: = a;
if (ide = false) and (a < b) then
begin
a: = a + b;
b: = c * b;
ide: = true;
writeln('a = ', a, ', b = ', b);
end;
if (ide = false) and (b < a) then
begin
a: = a * b;
b: = a + b;
ide: = true;
writeln('a = ', a, ', b = ', b);
end;
if (ide = false) and (a = b) then
begin
writeln('числа равны');
ide: = true;
end;
end.
2)
var
a, b: real;
begin
writeln('введите 2 числа');
readln(a, b);
if a < b then a: = 0;
writeln('a = ', a, ', b = ', b);
end.
3)
var
k, b: real;
begin
writeln('введите цену журнала');
readln(k);
writeln('введите, сколько у покупателя денег');
readln(b);
if b > k then writeln('покупатель получит ', b - k, ' р сдачи');
if b = k then writeln('покупатель не получит сдачи');
if b < k then writeln('покупателю придется доплатить ', k - b, ' р');
end.
4)
var
a: 100000..999999;
a1, a2, a3, a4, a5, a6: 1..9;
begin
writeln('введите шестизначное число');
readln(a);
a1: = a div 100000;
a2: = (a mod 100000) div 10000;
a3: = (a mod 10000) div 1000;
a4: = (a mod 1000) div 100;
a5: = (a mod 100) div 10;
a6: = a mod 10;
if (a1 + a2 + a3) = (a4 + a5 + a6) then writeln('число является счастливым')
else writeln('число не является счастливым');
end.
5)
var
a, b: integer;
begin
writeln('введите числа a и b');
readln(a, b);
if b mod a = 0 then writeln('число ', a, ' является делителем числа ', b)
else writeln('число ', a, ' не является делителем числа ', b);
end.
если все правильно, отметь решение как лучшее)
если возникнут вопросы - задавай
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Ксения20171111207.08.2021 14:06
-
Teddy1bear05.09.2022 23:35
-
ruuuuuyslan07.10.2021 00:04
-
olyakak00Fokcu25.03.2020 18:49
-
ivankasranka210.06.2023 17:11
-
slava28530.11.2021 07:39
-
КристиGirl20.02.2022 01:31
-
Aurelli120.06.2023 18:39
-
ghawkkas6910.11.2022 14:45
-
hitrovskiy0128.10.2022 13:17
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.