
Абрам
6 год назад
Напиште плиз программу вычисления площади прямоугольника (информатика)
ОТВЕТЫ

Maepnedik
Jul 10, 2019
Program kil;
Var a,b,p:real;
Begin
Writeln(a=);
Readln(a);
Writeln(b=);
Readln(b);
P:=2*(a+b);
Writeln(Периметр прямоугольника=,p);
End.
Var a,b,p:real;
Begin
Writeln(a=);
Readln(a);
Writeln(b=);
Readln(b);
P:=2*(a+b);
Writeln(Периметр прямоугольника=,p);
End.
171
Смежные вопросы: