Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kruglov428
20.05.2020 01:36 •
Информатика
Цикл с параметром написать программу, которая находит среднее арифметическое последних цифр всех чисел от 1 до введенного n.
Показать ответ
Ответ:
marga23042002
03.10.2020 15:11
Var
i, n, s: integer;
begin
readln(n);
for i := 1 to n do
s := s + i mod 10;
writeln(s / n);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Zhanar161
10.10.2021 20:26
Для какой из последовательностей цветных бусин ложно высказывание: не(последняя бусина зелёная) или (первая бусина синяя) или (вторая бусина красная) (к – красный, ж...
Аринка20061
06.01.2020 07:48
3. В языке запросов поискового сервера для обозначения логической операции «ИЛИ» используется символ «|», а для обозначения логической операции «И» — символ «&»....
Dimkakrut
29.10.2020 08:10
Чтобы стать королем Codeforces, Курони должен решить следующую задачу. Ему даны n чисел Курони посчитать ∏1≤iЕсли вы не знакомы с короткой формой записи, ∏1≤iВходные...
Алена1563795
30.01.2023 08:56
Составьте алгоритм адресации в глобальных сетях...
StudPacker
10.02.2023 19:29
Писать только на алгоритмическом языке!) 1) Даны натуральные числа A и B. Напишите алгоритм, чтобы найти наибольшее из этих двух чисел. 2) Даны три числа: A, B и C. Найдите...
8orzakt
23.04.2021 07:34
A ограничение по времени на тест2 s. ограничение по памяти на тест256 MB вводstandard input выводstandard output AdiZer0 готовясь к экзамену, узнал о интересных числах....
KasiaW
28.03.2023 01:42
Перевести число из 16 с/с в 2 с/с – АС936 Перевести число из 8 с/с в 16 с/с – 321756...
рптпfgb
14.03.2020 16:43
B. B ограничение по времени на тест1 s. ограничение по памяти на тест256 MB вводstandard input выводstandard output Определим рекуррентную последовательность следующим...
MrCony
01.12.2020 04:03
Сколько времени потребуется модему, передающему информацию со скоростью 1 КБ/с чтобы передать цветное растровое изображение размером 512×256 пикселей ...
Olhast
18.03.2022 18:53
Писать только на алгоратмическом языке: 1) Даны натуральные числа A и B. Напишите алгоритм, чтобы найти наибольшее из этих двух чисел. 2) Даны три числа: A, B и C. Найдите...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i, n, s: integer;
begin
readln(n);
for i := 1 to n do
s := s + i mod 10;
writeln(s / n);
end.