Информатика 9 класс срочно пожалуйста
знак равенства заменить знаком присвоения
end. в конце
Спасибо
А какой знак присвоения
:=
Правильный код: Program PRIMER; Var a,x:real; begin Write ('Введите число'); read (x); if (x<>0) then a:=x*x else a:=3*x; end.