напиште плиз программу вычисления площади прямоугольника (информатика)
Ответы на вопрос
Ответил K0tIIsuSa
0
Program kil;
Var a,b,p:real;
Begin
Writeln('a=');
Readln(a);
Writeln('b=');
Readln(b);
P:=2*(a+b);
Writeln('Периметр прямоугольника=',p);
End.
Var a,b,p:real;
Begin
Writeln('a=');
Readln(a);
Writeln('b=');
Readln(b);
P:=2*(a+b);
Writeln('Периметр прямоугольника=',p);
End.
Ответил julidov01
0
а readln не нужен перед енд?
Ответил K0tIIsuSa
0
Нет,т к у тебя идёт оператор присваивания,и по хорошему программа подставит ответ расчёта
Новые вопросы
Химия,
2 года назад
Информатика,
2 года назад
Литература,
8 лет назад
Алгебра,
8 лет назад
Математика,
9 лет назад