Ответы
Ответ дал:
0
Ответ:
Var y, x: integer;
begin
Writeln("введите число");
readln(x)
if x=0 them
y=x*x;
end
ipodkorytov204:
var x, y: Real;*
сори забыл в конце написать Writeln(y)
после y=x*x
Похожие вопросы
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад