ПАСКАЛЬ дана сторона квадрата a. составьте программу, которая вычисляет его площадь S и...

Question

ПАСКАЛЬ
дана сторона квадрата a. составьте программу, которая вычисляет его площадь S и периметр P и выводит результат на экран

Answer 1

Var a :integer;
begin
writeln ('Введите сторону a');
readln (a);
writeln;
writeln ('Периметр = ', (a*4);
writeln ('Площадь = ', (a*a);
readln;
end.

Answer 2

//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var a:=ReadReal('Введите сторону квадрата:');
write('S=',a*a,'; P=',a*4);
end.