PASCAL Помогите срочно прошу!Даны длина и ширина прямоугольника составьте программу...

0 голосов
48 просмотров
PASCAL Помогите срочно прошу!
Даны длина и ширина прямоугольника составьте программу вычисления его периметра и площади.
I. Математическая модель:
Дано: A,B - REAL
Найти: P,S - REAL
Формула: -?
II. Алгоритм:
1) Ввести:
2)Вычислить:
3)Вывести:
III. Программа в Паскале:

Информатика (126 баллов) | 48 просмотров
0

А формула???

0

да

0

а что писать после BEGIN

0

В Скобках WriteLn('Введите значения высоты и ширины через пробел.')

Дан 1 ответ
0 голосов

Var a,b,s,p:real;
begin
Write('Введите значения высоты и ширины через пробел: ');
read(a,b,);
S := a*b;
P := (a+b)*2;
write(S:5:2, P:5:2);
end.

Зайдите на этот сайт посмотрите теорию.    http://learnpascal.ru

(225 баллов)