Срочно помогите!!! Pascal (только начали проходить, приведите простой алгоритм) написать программу, для подсчета площади и периметра прямоугольника, если заданы стороны прямоугольника

Ответы

Ответ дал: Laftanill
0

Program gftubgfffgg;

Uses crt;

Var a, b, S, P: real;

Begin

Clrscr;

Write('введите длину>>');

Readln(a);

Write ('введите ширину>>');

Readln(b);

S:=a*b;

P:=(a+b)*2;

Writeln('Периметр =', P);

Writeln('Площадь =', S)

End.

Ответ дал: agabaeva1994
0
Там ведь нет массивов ?
Ответ дал: agabaeva1994
0
И после Begin что стоит?
Ответ дал: agabaeva1994
0
ау
Вас заинтересует