40 на паскале написать дано целое число k (1< =k< =365). определить каким днём недели (понедельник, или воскресенье) является k-й день года,в котором 1 января: а)понедельник б)d-й день недели (если 1 января-понедельник,то d=1,если вторник -d = воскресенье d=7).

166

299

Посмотреть ответы 2

Ответы на вопрос:

mastheadchan1

Информатика

4,5(93 оценок)

Uses crt; var k,n: integer; begin clrscr; writeln ('введи день года от 1 до 365'); readln (k); if (k> =1) and (k< =365) then begin n: =k mod 7; case n of 1: writeln ('понедельник'); 2: writeln ('вторник'); 3: writeln ('среда'); 4: writeln ('четверг); 5: writeln ('пятница'); 6: writeln ('суббота'); 0: writeln ('воскресенье'); end; end else writeln ('неверный ввод'); readln; end. uses crt; var k,n,d: integer; begin clrscr; writeln ('введи с какого дня недели 1 января (1-пон, 2-вт и тд до 7)'); readln (d); writeln ('введи день года от 1 до 365'); readln (k); if (k> =1) and (k< =365) and (d> =1) and (d< 8) then begin n: =k mod 7 +d-1; case n of 1: writeln ('понедельник'); 2: writeln ('вторник'); 3: writeln ('среда'); 4: writeln ('четверг'); 5: writeln ('пятница'); 6: writeln ('суббота'); 0,7: writeln ('воскресенье'); end; end else writeln ('неверный ввод'); readln; end.

aleksey778

Информатика

4,7(55 оценок)

A, b, c = () # строка не нужна, если переменные уже определеныa, b, c = c, a, bprint(a, b, c)

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.