Вопрос по информатике:
Помогите пожалуйста^^
Дано целое число k(1<=k<=365).Определить каким днем недели (понедельником ,...,воскресеньем) является k-ый день невисокосного года ,в котором 1 января -понедельник
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 04.01.2015 14:08
- Информатика
- remove_red_eye 16606
- thumb_up 42
Ответы и объяснения 1
Pascal
var k,a : integer;
begin
readln (k);
a := k mod 7;
case a of
1 : writeln (k,' Понедельник');
2 : writeln (k,' Вторник');
3 : writeln (k,' Среда');
4 : writeln (k,' Четверг');
5 : writeln (k,' Птница');
6 : writeln (k,' Суббота');
0 : writeln (k,' Воскресенье');
end;
end.
- 05.01.2015 12:29
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.