Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Ficksik12345
13.03.2022 22:17 •
Информатика
Дні тижня пронумеровані наступним чином: 0 — неділя, 1 — понеділок, 2 — вівторок, …, 6 — субота. дано ціле число k, що лежить в діапазоні 1-365. визначити номер дня тижня для k-го дня року, якщо відомо, що цього року 1 січня було понеділком.
Ответ:
alinurkanat
02.08.2020 11:15
Var k,n:integer;
begin
readln(k);
n:=k mod 7;
writeln('n = ',n);
end.
Пример:
34
n = 6
0,0
(0 оценок)
Популярные вопросы: Информатика
irynastar2103
25.12.2021 04:53
Паскаль.напишите в полной форме.ввести двумерный массив a nxm . каждый четный элемент массива нацело разделить на два. массив вывести до и после преобразования....
Nastyaprokopova2003
13.10.2021 01:24
Информационное сообщение объёмом 420 битов состоит из 70 символов. какова мощность алфавита, с которого записано это сообщение?...
Vanek255
13.10.2021 01:24
Дано двузначное римское число, определить его десятичное значение. (паскаль) , , взаранее вот обозначения некоторых: i - 1 ; v - 5 ; x - 10 ; l - 50...
wereweek777
13.10.2021 01:24
Решить на pascal. зарание )) хозяин хочет обклеить обоями длинную стену в своем доме. длина этой стены =а м., а высота- b м. рулон обоев имеет длину 12 м и ширину с м. сколько...
Евридика1
13.10.2021 01:24
Описать процедуру sumdigit(n,s), находящую сумму цифр s целого числа n (n — входной, s — выходной параметр). используя эту процедуру, найти суммы цифр пяти данных чисел....
Liya20034
13.10.2021 01:24
Написать ! pascalabc. введите массив из 5 элементов с клавиатуры и найдите количество элементов, старшая цифра которых равна 8....
romaantonizin
25.06.2021 04:49
Как записывается число a0187 в восьмеричной системе счисления?...
SL87
25.06.2021 04:49
Синформатикой измените одну букву в слове бант чтоб получилось другое слово заранее...
qwerttrewq12345
06.11.2022 19:22
Линукстут должен быть не вывод текста на экран, а конкретные цифры, т.е. вводишь 1 - скрипт присваивает значение переменной, любой, например а=10вводишь 2 - скрипт выводит значение...
Виолетта2018
23.05.2020 02:04
Написать своё имя с 3х разных кодов...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln(k);
n:=k mod 7;
writeln('n = ',n);
end.
Пример:
34
n = 6