Question

Написать программу Паскаля, нахождение площади квадрата, значение сторон а=4. Нужен полный алгоритм с числами. Туплю уже второй день. ПОМОГИТЕ.

Answer 1

var

a:integer;

begin

a:=4;

a:=a*a;

writeln('Площадь = ', a);

end.

Answer 2

var 4:integer;

begin

readln(4);

writeln(4*4);

end.