Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.02.2012, 20:24   #1
альбертоо
 
Регистрация: 05.12.2011
Сообщений: 9
По умолчанию Не сложная задача CRT

Дан номер месяца (1 — январь, 2 — февраль, ...10 - декабрь). Человек вводит номер месяца, Нужно вывести название соответствующего времени года ("зима", "весна" и т.д.).
пример входных данных:
7
пример выходных данных:
"лето"


Спасибо)
альбертоо вне форума Ответить с цитированием
Старый 17.02.2012, 20:35   #2
unbanned
Форумчанин
 
Аватар для unbanned
 
Регистрация: 23.11.2010
Сообщений: 530
По умолчанию

как же вы определили что задача не сложная? и если не сложная почему не сделаете сами?
могу предложить такой вариант:
Код:
  case n of
    12, 1, 2: writeln('зима');
    3..5: writeln('весна');
    6..8: writeln('лето');
    9..11: writeln('осень')
  else
    writeln('нет такого месяца');
unbanned вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не сложная задача maxwel6064 Паскаль, Turbo Pascal, PascalABC.NET 1 02.01.2012 13:56
Сложная задача(( альбертоо Паскаль, Turbo Pascal, PascalABC.NET 1 07.12.2011 16:57
сложная задача!( sergsergserg Помощь студентам 1 09.11.2011 18:47
Сложная задача. ВДПУ Помощь студентам 4 07.11.2011 22:34
Сложная задача asale Microsoft Office Excel 6 07.04.2009 20:36