НАПИШИТЕ Программку,МОЛЮ ,34 БАЛЛАВ 17 вагонов. С 10 по 17 вагонов

НАПИШИТЕ Программку,МОЛЮ ,34 БАЛЛА

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

Задать свой вопрос
2 ответа

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

Внимание! Если программка не работает, обновите версию!

begin

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

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

end.

Аделина Марафутдинова
В каком плане?
Sergej Arilin
Ну в таком, что не указывает наружный адресок внутри сетки
Липезина Лариса
ааа
Рогощенков Борис
Попробуйте с роутером поиграть через system.net
Salenek Vika
В \Samples\NetLibraries есть пример работы
Семён Годзиковский
методы - на веб-сайте через MSDN
Мария Алякрова
Доберетесь до роутера, может скриптом каким сдерните данные
Леха Горловский
У меня он, к примеру, сходу идет в диалог, так что там точно нужен скрипт.
Степа
Большего, к раскаянью, сказать не могу. Не мое оно.
Иван Ивонников
Хех, да ничего. Вы и так мне многим посодействовали)))) Покорнейше благодарю.
Program kwajld;
uses CRT;
var a:integer;
begin
writeln('Введите номер вагона');
readln(a);
if (alt;10)
then writeln('Плацкартный')
else writeln('Купейный');
end
Милкиель Инна
И, заодно, program )))
Лариса
ну, правдиво разговаривая, это все необязательно, но он обучается в школе видно. Ему то надобно
Гербеева Агата
Выкиньте две первых строчки - и по факту ничего не изменится.
Viktor Salitrinnik
С чего это "ему надобно" то, что никому не надо?
Ольга Джиошвили
Я же написал, что не непременно) Пишу для воспитанников так)
Гарицкая Яна
Окончательно оправдываюсь, но print и readinteger знают не все
Толик
А я здесь разве что-то про print и readinteger у Вас спросил?
Кристина Чесаченко
Нет, я просто задал встречный вопрос, если уж дело встало так
Mihail Deriga
Проще вопрос задавать так, где он в тему, т.е. под подходящим решением)
Вячеслав Кулетов
Хорошо)
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт