НАПИШИТЕ ПРОГРАММУ,МОЛЮ ,34 БАЛЛА В 17 вагонов. С 10 по 17 вагонов купейные, а остальные-плацкартные. Ввести с клавиатуры номер вагона. Напечатать его вид.
begin
if ReadInteger('№ вагона:') > 9 then Print('Купейный')
else Print('Плацкартный')
end.
В каком плане?
Ну в таком, что не показывает внешний адрес внутри сетки
ааа
Хех, да ничего. Вы и так мне многим помогли)))) Покорнейше благодарю.
Большего, к сожалению, сказать не могу. Не мое оно.
У меня он, например, сразу идет в диалог, так что там точно нужен скрипт.
Доберетесь до роутера, может скриптом каким сдерните данные
методы - на сайте через MSDN
В \Samples\NetLibraries есть пример работы
Попробуйте с роутером поиграть через system.net
Program kwajld; uses CRT; var a:integer; begin writeln('Введите номер вагона'); readln(a); if (a<10)<br>then writeln('Плацкартный') else writeln('Купейный'); end
Проще вопрос задавать так, где он в тему, т.е. под соответствующим решением)
Нет, я просто задал встречный вопрос, если уж дело встало так
А я тут разве что-то про print и readinteger у Вас спросил?
Конечно извиняюсь, но print и readinteger знают не все
Я же написал, что не обязательно) Пишу для учеников так)
С чего это "ему надо" то, что никому не надо?
Выкиньте две первых строки - и по факту ничего не изменится.
И, заодно, program )))
ну, честно говоря, это все необязательно, но он учится в школе видно. Ему то надо
Хорошо)