НАПИШИТЕ ПРОГРАММУ,МОЛЮ ,34 БАЛЛА

В 17 вагонов. С 10 по 17 вагонов купейные, а остальные-плацкартные. Ввести с клавиатуры номер вагона. Напечатать его вид.

Конечно извиняюсь, но print и readinteger знают не все

А я тут разве что-то про print и readinteger у Вас спросил?

Нет, я просто задал встречный вопрос, если уж дело встало так

Проще вопрос задавать так, где он в тему, т.е. под соответствующим решением)

Хорошо)

методы - на сайте через MSDN

Доберетесь до роутера, может скриптом каким сдерните данные

У меня он, например, сразу идет в диалог, так что там точно нужен скрипт.

Большего, к сожалению, сказать не могу. Не мое оно.

Хех, да ничего. Вы и так мне многим помогли)))) Покорнейше благодарю.

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018Внимание! Если программа не работает, обновите версию!

begin

 if ReadInteger('№ вагона:') > 9 then Print('Купейный')

 else Print('Плацкартный')

end.

program kwajld;uses CRT;var a:integer;beginwriteln('Введите номер вагона');readln(a);if (a<10)then writeln('Плацкартный')else writeln('Купейный');end