Предмет: Информатика, автор: Helpmeeeplsss

Помогите простейший алгоритм в codegear

Приложения:

Ответы

Автор ответа: TheCleverOlya
0

var a,b, P: real;

begin

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

readln(a,b);

P:=2*(a+b);

write('периметр (P) = ',P);

readln;

end.

Интересные вопросы
Предмет: История, автор: karpuhinnazar3