Ввести номер дня недели. Вывести название этого дня - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.99/88:

@Игорь Чёрный 1 / 1 / 0 Регистрация: 06.06.2013 Сообщений: 8

	Ввести номер дня недели. Вывести название этого дня 06.06.2013, 11:48. Показов 17807. Ответов 1 Метки нет (Все метки) ввести номер дня недели. вывести название этого дня 0

Лучшие ответы (1)

Сообщение: #4679649

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

06.06.2013, 11:48

Ответы с готовыми решениями:

Определить номер месяца M и дня недели D по порядковому номеру дня в году
Вводится число T-порядковый день в году.Определить номер месяца M и дня недели D, соответствующих T(Например, если T=365 то M=12 a D-31

С начала 1990 года по некоторый день прошло n месяцев и 2 дня. Определять название месяца этого дня
С начала 1990 года по некоторый день прошло n месяцев и 2 дня. Определять название месяца ( январь, февраль и т.п) этого дня

Дано целое число K, лежащее в диапазоне 1–365. Определить номер дня недели для K-го дня года,
Дни недели пронумерованы следующим образом: 0 — воскресенье, 1 — понедельник, 2 — вторник, …, 6 — суббота. Дано целое число K, лежащее в...

Midian

606 / 388 / 198

Регистрация: 31.03.2013

Сообщений: 2,689

06.06.2013, 13:29

Сообщение было отмечено Игорь Чёрный как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var x:integer;
 begin
 write('Введите число: ');
 readln(x);
   case x of
    1:write('Понедельник');
    2:write('Вторник');
    3:write('Среда');
    4:write('Четверг');
    5:write('Пятница');
    6:write('Суббота');
    7:write('Воскресенье');
  end;
  end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

06.06.2013, 13:29

Помогаю со студенческими работами здесь

Вывести на экран название дня недели, соответствующее заданному числу
17. Вывести на экран название дня недели, соответствующее заданному числу, при условии что в месяце 31 день и первое число понедельник.

Вывести строку - название дня недели, соответствующее данному числу
Дано целое число в диапазоне 1–7. Вывести строку - название дня недели, соответствующее данному числу (1 – «понедельник», 2 – «вторник» и...

Вводим номер месяца M и дня D. Определить порядковый номер дня в году T соответствующий этой дате
Вводим номер месяца M и дня D. Определить порядковый номер дня в году T соответствующий этой дате. Помогите. Очень нужно ...

Нахождение дня недели по номеру дня в месяце
Нужно найти нзвание дня недели по номеру дня в месяце(Например: Вводится число 16 и выводится название:Пятница). Март предыдущего...

Получить номер дня и месяца и определить дату следующего дня (считая, что год невисокосный)
Всем привет! Буду очень благодарен если поможете составить программу в PascalABC. Условие звучит так: Напишите программу, которая получает...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Изучаю kubernetes lagorue 13.01.2026 А пригодятся-ли мне знания kubernetes в России?	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .	Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .

Наверх