Pepepposa
5 год назад
Написать программу на языке паскаль. даны стороны прямоугольника a и b. найти его периметр P=2*(a+b)
ОТВЕТЫ
Gospodin
Oct 24, 2020
uses crt;
var a, b, S, P:integer;
begin
write('a='); readln(a);
write('b='); readln(b);
S:=a*b; P:=2*(a+b);
write('S=',S,' ','P=',P);
end.
var a, b, S, P:integer;
begin
write('a='); readln(a);
write('b='); readln(b);
S:=a*b; P:=2*(a+b);
write('S=',S,' ','P=',P);
end.
589
