ввести два числа если их сумма больше 100,то сумму уменьшить в 2 раза,в противном случае увеличить в 2 раза.помогите решить информатику!
Ответы на вопрос
Ответил Aillianna
0
var
a, b: real;
begin
readln(a, b);
a := a + b;
if a > 100 then a := a / 2 else a := a * 2;
write(a);
end.
a, b: real;
begin
readln(a, b);
a := a + b;
if a > 100 then a := a / 2 else a := a * 2;
write(a);
end.
Новые вопросы
Другие предметы,
2 года назад
Русский язык,
2 года назад
Физика,
9 лет назад
Алгебра,
9 лет назад
Химия,
9 лет назад