Дано число если даное число нечотное то умножить на 2 если даное число больше 7-ми то вычислить квадратный корень
Ответы на вопрос
Ответил postovalov
0
Паскаль:
var a:integer;begin ReadLn(a); if not (a mod 2 = 0) then WriteLn(a*2); if a > 7 then Writeln(Sqrt(a));end.
var a:integer;begin ReadLn(a); if not (a mod 2 = 0) then WriteLn(a*2); if a > 7 then Writeln(Sqrt(a));end.
Ответил postovalov
0
Лучшее ставь!
Новые вопросы