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. В чём ошибка?
Ошибка в программе заключается в неверном использовании функции sqrt2. Вместо этого нужно использовать функцию sqrt для вычисления квадратного корня. Правильный код будет выглядеть так:
Program yura; var x : integer ; begin writeln ('Напишите x') ; readln (x) ; if x mod 2 = 0 then writeln(xx + sqrt(x)) else writeln(xx*x + x) end.
Ошибка в программе заключается в неверном использовании функции sqrt2. Вместо этого нужно использовать функцию sqrt для вычисления квадратного корня. Правильный код будет выглядеть так:
Program yura;
var
x : integer ;
begin
writeln ('Напишите x') ;
readln (x) ;
if x mod 2 = 0 then
writeln(xx + sqrt(x))
else
writeln(xx*x + x)
end.