Задание:
program yura; var x: integer; begin writeln ('Напишите x'); readln (x); if x mod 2=0 then writeln (x*x+(sqrt2) else writeln (x*x*x+x) end.
Решение:
Не очень понятно задание. На сколько могу судить ошибки нет.
Знаете другой ответ?
program yura; var x: integer; begin writeln ('Напишите x'); readln (x); if x mod 2=0 then writeln (x*x+(sqrt2) else writeln (x*x*x+x) end.
Не очень понятно задание. На сколько могу судить ошибки нет.
Знаете другой ответ?