Быстрый переход в группу «Пользователи», без надобности написания постов и ожидания.
Покупка дает возможность:
Быть полноправным участником форума
Нормальное копирование кода
Создавать темы
Скачивать файлы
Доступ к архиву Pawno-Info
Маппинг для сервера
Если вы хотите обновить Ваш сервер новыми доработками — то зайдите в наш раздел. Большой выбор готовых решений от наших пользователей
Моды для сервера
Огромный выбор различных модификаций для Вашего сервера. Пролистайте эти темы! Возможно именно там Вы найдете то, что искали уже давно.
Программы для скриптера
Подборка удобных программ для скриптера
- Форумы
- Языки программирования
- Delphi, Pascal, Python
- Готовые решения
- Автор темы #Azamat
- Дата начала 27 Янв 2016
- Теги /colorcolorintegerphpseasonstringvar
#Azamat
Изучающий
Пользователь
Регистрация 18 Ноя 2015 Сообщения 675 Лучшие ответы 0 Репутация 86 Адрес г.Уфа
Поиск и подстановка по 2 критериям (ВПР по 2 столбцам)
Программа выводит название сезона по номеру месяца.
var Month: integer; Season: string; begin write(‘Введите номер месяца: ‘); readln(Month); if (Month=1) or (Month=2) or (Month=12) then Season := ‘Зима’ else if (Month=3) or (Month=4) or (Month=5) then Season := ‘Весна’ else if (Month=6) or (Month=7) or (Month=8) then Season := ‘Лето’ else Season := ‘Осень’; writeln(‘Это ‘,Season) end.
Поделиться:
- Партнеры Pawno Info
- Условия и правила
- Политика конфиденциальности
- Помощь
- Главная
- RSS
О нас
«Pawno Info» — портал о программировании номер один. Начните с нами изучать эти великолепные и бесконечные виртуальные миры. Научитесь создавать функции и скрипты используя наши уроки по программированию на различных языках. Задавайте вопросы которые Вас интересуют и получайте ответы от наших профессионалов. Будьте с нами. Будьте там, где лучшее.
Наши ссылки
Статистика форума
Темы 196,639 Сообщения 1,355,108 Пользователи 108,624 Новый пользователь midal
Портал о программировании Pawno-Info.Ru
Created by Giness
Уважаемый Гость.
Пожалуйста — воздержитесь от любых комментариев на форуме относительно ситуации в мире.
В личных сообщениях, в темах и где бы то не было.
Помните — это закончится в любом случае, а слова, сказанные (или написанные) Вами — не забудутся никогда.
МЫ ЗА МИР.
(Любые сообщения относительно ситуации в мире(не важно с каким смыслом) буду удаляться. А пользователи — блокироваться безвозвратно. )
Источник: pawno-info.ru
#3 Excel Перенос данных с листа на лист, функция ВПР коротко
Составить программу которая по номеру месяца выводит его название
помоги пожалуйста!
Составить программу, которая по данному числу (1-12) выводит название соответствующего ему месяца.
необходимо использовать оператор case
вот как я сделала скелет этой задачи(конечно это неправильно), я прочто не могу понять как мне это надо оформит! можно сказать, что вобще не разбюираюсь. только начали изучать.
program vibor:
var: x: integer;
begin
writeln (‘ ввод x’);
readln (x);
case K of ( и вот тут не могу правильно описать. )
.
writeln (x);
end
согласно правилу нужно использовать вид a1: ;
Регистрация: 08.03.2016
Сообщений: 0
Регистрация: 19.08.2007
Сообщений: 15,750
Записей в дневнике: 71
Сказал(а) спасибо: 162
Поблагодарили 200 раз(а) в 84 сообщениях
Репутация: 74843
Правильная форма команды выбора:
case of метка1: список команд1; метка2: список команд2; . меткаN: список командN; else список команд(N+1) end;
Селектором может служить переменная разрешенного типа, например, целочисленная, вещественная, символьная, строковая и прочие.
В качестве метки выступают конкретные значения селектора для задания механизма выбора. Если имеются одинаковые варианты списков команд для разных значений селектора, то в этом случае эти значения можно перечислить в одной строке через запятую или в виде перечислимого типа, например, так: 1..9,11..19: список команд.
Ваш вариант задачи решается просто. Простейший пример написания команды выбора для вашей задачи:
readln(MountNumber); case MountNumber of 1: write(‘январь’); 2: write(‘февраль’); 3: write(‘март’); 4: write(‘апрель’); 5: write(‘май’); 6: write(‘июнь’); 7: write(‘июль’); 8: write(‘август’); 9: write(‘сентябрь’); 10: write(‘октябрь’); 11: write(‘ноябрь’); 12: write(‘декабрь’); else write(‘нет такого месяца’) end;
Источник: www.tehnari.ru
Практическая работа № 28
«Множественный выбор»
Уровень A. Напишите программу, которая получает номер месяца и выводит его название и время года.
Введите номер месяца: 5 Этот месяц – май, время года — весна.
Введите номер месяца: 15 Неверный номер месяца.
Уровень B. Напишите программу, которая получает день и номер месяца и определяет дату следующего дня. Считайте, что год невисокосный (365 дней).
Введите день и месяц: 25 12 Следующий день: 26 декабря
Введите день и месяц: 28 2 Следующий день: 1 марта
Уровень C. Напишите программу, которая получает день и номер месяца, а выводит количество дней, оставшихся до Нового Года. Считайте, что год невисокосный (365 дней). Учтите, что слово «дней» может иметь также формы «день» и «дня».
Введите день и месяц: 25 12 Осталось 7 дней до Нового Года.
Введите день и месяц: 1 1 Осталось 364 дня до Нового Года.
Введите день и месяц: 31 2 Неверная дата.
Источник: xn—-7sbbfb7a7aej.xn--p1ai