Ответы
Ответ дал:
0
Var a,b,c:real;
Begin
Write('Введите длину стороны а и b: '); readln(a,b);
c:=a+b*2;
writeln('Периметр комнаты равен: ',c );
End.
Begin
Write('Введите длину стороны а и b: '); readln(a,b);
c:=a+b*2;
writeln('Периметр комнаты равен: ',c );
End.
Ответ дал:
0
у меня есть паскаль он всё подправит
Ответ дал:
0
если не написать пробелы в writeln('Периметр комнаты равен',c ); твой паскаль не сделает пробела между надписью "периметр равен" и перемнной. надо в ручную вводить пробел. вот так: writeln('Периметр комнаты равен: ',c );
Вас заинтересует
2 года назад
2 года назад
8 лет назад
8 лет назад
10 лет назад