
Saanaschl
5 год назад
Составить программу для вычисления периметра ромба
ОТВЕТЫ

Милка
Oct 24, 2020
Program;
Uses crt;
Var a:real;
Begin
Writeln('Введите сторону ромба');
Read(a);
P:=a*a;
Writeln('Периметр ромба равен');
End
Uses crt;
Var a:real;
Begin
Writeln('Введите сторону ромба');
Read(a);
P:=a*a;
Writeln('Периметр ромба равен');
End
905
Смежные вопросы: