Пусть пользователь вводит 2 целых числа - длины сторон прямоугольника. Составьте программу вычисления площади и периметра прямоугольника.

Question

Информатика

Виленин

1 ноября, 15:39

Пусть пользователь вводит 2 целых числа - длины сторон прямоугольника. Составьте программу вычисления площади и периметра прямоугольника.

+5

Ответы (1)

Знаете ответ на вопрос?

Стефа · Answer 1

Var a, b:integer;

begin

writeln ('Введите стороны a и b') ;

writeln ('Введите сторону a') ;

readln (a) ;

writeln ('Введите сторону b') ;

readln (b) ;

writeln;

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

writeln ('Площадь = ', a*b) ;

readln;

end.