Ответы
Ответ дал:
1
var a: real;
begin
writeln ('введите число которое нужно возвести в квадрат');
readln (a);
write(a,'^2=');
a:=a*a;
write(a);
end.
Похожие вопросы
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад