Напишите программу которая вычисляет площадь и периметр прямоугольника по длинам двух его сторон

322fase322 322fase322    1   02.05.2019 07:51    18

Ответы
sasuke97 sasuke97  09.06.2020 05:47

program count;

var a, b, s, p: real;

begin

writeln (‘Введите значения длин двух сторон прямоугольника‘ );

readln (a, b);

s := a * b;

writeln (‘Площадь равна ‘, s);

р := 2 * (a+b);

writeln (‘Периметр равен’, р);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика