Question

30баллов‼️
Напишите программу для вычисления квадрата числа на языке Паскаль

Answer 1

var a: real;

begin

writeln ('введите число которое нужно возвести в квадрат');

readln (a);

write(a,'^2=');

a:=a*a;

write(a);

end.