
Домнин
6 год назад
Составить алгоритм и написать решение задачи на Паскале: Дано целое число а. Найти периметр и площадь квадрата со стороной а
ОТВЕТЫ

Frontasiy
Jul 4, 2019
Program pr;
var
a,s,p : real;
begin
writeln(Введите сторону квадрата);
readln(a);
s := a*a;
p := 4*a;
writeln(Площадь = );
write(s);
writeln(Периметр = );
write(p);
readln();
end.
var
a,s,p : real;
begin
writeln(Введите сторону квадрата);
readln(a);
s := a*a;
p := 4*a;
writeln(Площадь = );
write(s);
writeln(Периметр = );
write(p);
readln();
end.
197