
Seeken
5 год назад
Дано число если даное число нечотное то умножить на 2 если даное число больше 7-ми то вычислить квадратный корень
ОТВЕТЫ

Алина
Oct 24, 2020
Паскаль:
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.
657
Смежные вопросы: