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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 22.10.2011, 19:05   #1
Alexxxxxx
Пользователь
 
Регистрация: 21.10.2011
Сообщений: 22
По умолчанию Надо решить в Паскале , Заранее спасибо )))

Написать программу , используя оператор выбора саse
Задача : Дан номер месяца (1-январь, 2-февраль,...) Вывести название соответствующего времени года ("зима", "весна"и тд.)
Alexxxxxx вне форума Ответить с цитированием
Старый 22.10.2011, 19:15   #2
Вадим Мошев

Старожил
 
Аватар для Вадим Мошев
 
Регистрация: 12.11.2010
Сообщений: 8,568
По умолчанию

На форуме уже была такая задача. Решалась. Ищите.
Вадим Мошев вне форума Ответить с цитированием
Старый 22.10.2011, 19:32   #3
Alexxxxxx
Пользователь
 
Регистрация: 21.10.2011
Сообщений: 22
По умолчанию

Цитата:
Сообщение от Вадим Мошев Посмотреть сообщение
На форуме уже была такая задача. Решалась. Ищите.
Я искал , но не нашел эту задачу (((
Alexxxxxx вне форума Ответить с цитированием
Старый 22.10.2011, 21:49   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

А что сам ты смог написать по этой задаче?
Ибо непонятно много моментов, например как ты месяцы вводишь.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.10.2011, 22:05   #5
grom333
Форумчанин
 
Аватар для grom333
 
Регистрация: 21.10.2008
Сообщений: 337
По умолчанию

Типа того? Думаю написал самый ламерский способ...
Код:
const
s1='zima';
s2='vesna';
s3='leto';
s4='osen';
var i:integer;
s:string;
begin
write('vvedite nomer mesyaca');
readln(i);
case i of

1: s:=s1;
2: s:=s1;
3: s:=s2;
4: s:=s2;
5: s:=s2;
6: s:=s3;
7: s:=s3;
8: s:=s3;
9: s:=s4;
10: s:=s4;
11: s:=s4;
12: s:=s1;
end ;
write(s);
readln;
end.
Лучше быть последним из львов, чем первым среди шакалов.
Мой чат
community on struggle with zoomics
grom333 вне форума Ответить с цитированием
Старый 22.10.2011, 22:12   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Код:
case i of
1..2,12: s:=s1;
3..5: s:=s2;
6..8: s:=s3;
else: s:=s4;
end ;
Короче, не правда ли?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.10.2011, 22:34   #7
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,899
По умолчанию

А чтобы самые хитрые типа меня )) не вводили 13 и т.п., лучше записать в ветку else что ввод неверный, а для осени сделать диапазон 9..11
phomm вне форума Ответить с цитированием
Старый 22.10.2011, 23:29   #8
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
лучше записать в ветку else что ввод неверный
Ага. Или ченить типа
Код:
case i mod 12 of
Чтоб самые хитрые типа тебя вводили и 13 и другую ересь )))
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите пожалуста решить задачку, заранее спасибо Rakfeller Помощь студентам 3 22.05.2009 20:07
помогите пожалуйста решить 2 задачи,заранее спасибо Анютка...... Паскаль, Turbo Pascal, PascalABC.NET 0 24.11.2008 11:21
Помогите пожалуйста решить одну задачку в Паскале...Заранее спасибо VisTBacK Помощь студентам 2 29.09.2008 14:57