Вопрос по информатике:
20+10 БАЛЛОВ!!!!!!!
Составьте процедуру вывода на экран названия дня недели по его порядковому номеру (1-понедельник, 2-вторник и т.д). С помощью этой процедуры выведите на экран, каким днем недели будет заданное число месяца, если месяц начинается с понедельника.
- 15.11.2017 10:04
- Информатика
- remove_red_eye 8470
- thumb_up 34
Ответы и объяснения 2
Begin
Case N of
0:WriteLn('Понедельник');
1:WriteLn('Вторник');
2:WriteLn('Среда');
3:WriteLn('Четверг');
4:WriteLn('Пятница');
5:WriteLn('Суббота');
6:WriteLn('Воскресенье');
End
End;
Var
A:integer;
Begin
WriteLn('Введите число месяца');
ReadLn(A);
ABC((A-1) mod 7);
End.
- 16.11.2017 20:33
- thumb_up 41
Begin
Case n of
1:WriteLn('Понедельник');
2:WriteLn('Вторник');
3:WriteLn('Среда');
4:WriteLn('Четверг');
5:WriteLn('Пятница');
6:WriteLn('Суббота');
7:WriteLn('Воскресенье');
End
End;
Var d:integer;
Begin
Write('d = ');
ReadLn(d);
week((d-1) mod 7+1);
End.
Пример:
d = 14
Воскресенье
- 17.11.2017 19:47
- thumb_up 20
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.