Определить каким будет К-й день года если 1 января понедельник

@das1991 · Регистрация: 07.12.2010

Оператор выбора
Дано целое число К (1 <=K<=360). Определить каким будет К-й день года если 1 января понедельник.

@Puporev · 29.01.2011, 10:21

Pascal

case k mod 7 of
1:write('Понедельник');
2:
3:
......
0:write('Воскресенье');
end;

@das1991 · 29.01.2011, 10:39 **[ТС]**

Не так неапример водишь 78 он выдоёт день недели

@Puporev · 29.01.2011, 10:41

А у меня что выводит?

Добавлено через 31 секунду
Ты уж ввод сам как-то напиши...

@das1991 0 / 0 / 1 Регистрация: 07.12.2010 Сообщений: 21
		1
	Определить каким будет К-й день года если 1 января понедельник 29.01.2011, 09:58. Показов 2381. Ответов 3 Метки нет (Все метки) Оператор выбора Дано целое число К (1 <=K<=360). Определить каким будет К-й день года если 1 января понедельник. 0

@das1991 0 / 0 / 1 Регистрация: 07.12.2010 Сообщений: 21
	29.01.2011, 10:39 [ТС]	3
	Не так неапример водишь 78 он выдоёт день недели 0

@Puporev Почетный модератор 64275 / 47574 / 32739 Регистрация: 18.05.2008 Сообщений: 115,182
	29.01.2011, 10:41	4
	А у меня что выводит? Добавлено через 31 секунду Ты уж ввод сам как-то напиши... 1

Опции темы

Решение