Ввести два числа. Если их сумма больше
100, то сумму уменьшить в 2 раза, в
противном случае увеличить в 2 раза.

denchik83 denchik83    1   12.05.2020 18:49    11

Ответы
Фидачина Фидачина  14.09.2020 09:34

var a,b,c:real; begin writeln ('Введите числа'); readln (a,b); c:=a+b; if c>100 do c:=c/2 else c:=c*2; write (c) end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика