Написать програму вычесления площади и периметра прямоугольника , если извесна длина сторон a, b.(всё это дольжно выгледит програмай для паскаль adc)

dondokovsoel59 dondokovsoel59    1   15.08.2019 18:20    2

Ответы
Nadin18 Nadin18  04.10.2020 21:31
Var
a,b,P,S:integer;
begin
writeln('Введите а и b');
read(a,b);
S:=a*b;
P:=(a+b)*2;
writeln('Периметр равен = ',P);
writeln('Площадь равна = ',S);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика