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

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

Ответ

program s_p;
var a, b, s, p: real;
begin
write (‘Введите два числа, разделяя их пробелом: ‘ );
read (a, b);
s:=a*b;
writeln (‘Площадь равна ‘, s);
р:=2*(a+b);
writeln (‘Периметр равен’, р);
end.

Опубликовано: 09.02.2019 Обновлено: 09.02.2019
Поделись с друзьями

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *

пять + пять =