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

Ответ

Автор - fedrfedr

Ответ:

program Perimeter;

var

a, b: Integer;

begin

Write ('Введите стороны прямоугольника: ');

ReadLn (a, b);

WriteLn ('Периметр = ', (a + b) * 2);

ReadLn;

end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.