Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Помогите написать программу для Паскаля

Никита Шестаков Ученик (120), закрыт 4 года назад
Напишите программу. Вычислить площадь и периметр прямоугольника по данным ширине и высоте.
Длины сторон вводятся пользователем.
Периметр прямоугольника: P=2(a+b)
Площадь прямоугольника: S=ab
Лучший ответ
Остальные ответы
Marat Babayan Профи (646) 4 года назад
Program n_1;

var a, b:double;

begin

read(a, b);

writeln('Площадь прямоугольника равна ', a*b, ', а его периметр ', (a+b)*2;

end.
хотя я не проверял, не знаю
Victor Surozhtsev Просветленный (34297) 4 года назад
program rectangle; var a,b:real; begin write('a b > '); readln(a,b); writeln('Площадь ',a*b:0:12); writeln('Периметр ',2*(а+b):0:12) end.
Похожие вопросы