Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
angelina20172
21.01.2020 19:59 •
Информатика
Дан массив из 10 элементов. подсчитать сумму элементов, кратных 9
Показать ответ
Ответ:
сема891
08.10.2020 00:28
var a: array [1..10] of integer; c,sum: integer;beginsum:=0; writeln('введите элементы массива '); for c := 1 to 10 do read(a[c]); for c := 1 to 10 do if (a[c] mod 9) = 0 then sum:=sum+a[c];writeln('сумма равна =',sum);end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ndknmm
01.03.2020 21:11
1. сколько мегабайт информации содержится в сообщении размером 2^17 байт? 2. сколько бит информации содержится в сообщении размером 1/512 часть мегабайта? ***( / -...
You666
25.01.2020 16:34
Есть программа по нахождению квадратного уравнения: : var a,b,c: real; x1,x2,d: real; begin readln(a,b,c); d : = b*b - 4*a*c; if d 0 then writeln( корней нет ) else...
vinerplay6
09.09.2021 04:32
A= 3 16 A=0 A=1 не является высказыванием решить...
Меньон258
06.04.2020 03:14
1. Поиск, сбор, хранение, преобразование, использование информации -это предмет изучения: * робототехника кибернетика информатика математика 2. Из данного списка выберите...
LegPug
06.09.2020 00:20
Не получается составить программу (язык паскаль) вычисления сопротивления электрической цепи,состоящей из двух последовательно соединенных сопротивлений. (величина...
Андрей14411
19.01.2023 04:18
Яка команда використовується для перевірки підключення до мережі та надання відповіді на кожен пакет, отриманий віддаленим хостом? Group of answer choices ping connect...
228pfxt
19.02.2022 17:29
2доступ к файлу summer.htm, находящемуся на сервере seasons.com, осуществляется по протоколу http. фрагменты адреса файла закодированы числами от 1 до 7 . запишите...
vladlukyanov1
02.12.2022 04:36
По итогам экзаменов из 37 студентов оценку «отлично» по экономике получили 15 человек, по физике — 16, по психологии — 19, по экономике и физике — 7, по экономике...
asssssw
13.08.2020 03:45
Составьте семантическую сеть по русской народной сказке репка...
Nyashka12
13.08.2020 03:45
5.1 задания для практических работ информатика 7 класс босова...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота