
Thorga
5 год назад
Есть сторона квадрата a=8.50 как найти периметр программа pascal ABC
ОТВЕТЫ

Nikolaj
Oct 24, 2020
var
a,P:real;
begin
writeln('Введите сторону квадрата');
readln(a);
P:=a*a*a*a;
writeln('Периметр квадрата равен',P);
end.
a,P:real;
begin
writeln('Введите сторону квадрата');
readln(a);
P:=a*a*a*a;
writeln('Периметр квадрата равен',P);
end.
179
Смежные вопросы: