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