Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
belnata84
27.07.2022 10:16 •
Информатика
Дан массив из n чисел найти сумму тех чисел у которых нечетный индехс и числа кратны 5 или 3
Показать ответ
Ответ:
Dydina5555521
05.07.2020 09:49
Var a:array[1..100000] of integer;
s,i,n:integer;
begin
readln(n);
for i:=1 to n do begin
read(a[i]);
if (i mod 2 <> 0) and ((a[i] mod 5 = 0) or (a[i] mod 3 = 0)) then s+=a[i];
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Regina391
29.06.2021 22:13
Запиши выражение (2+t)2 на языке паскаль. (при записи ответа используй прописные буквы это !...
кпаприрр
29.06.2021 22:13
30 подготовьте сообщение 10-15 предложений на тему : устройство ввода информации (клавиатура)...
dianadiana1982
25.01.2022 08:16
Скорость чтения ученика 6 класса составляет приблизительно 200 символов в минуты .какой объем информации получит ученик ,если он будет непрерывно читать в течении...
antoxor
21.09.2021 13:55
Информатика.вопросы по теме word: 1.чтобы создать новую таблицу, 2.чтобы вставить 2 столбца , 3.чтобы перенести рисунок на другое место, 4.чтобы изменить размер...
нор123456789
28.12.2021 19:42
дам лутши ответ и Создание векторных изображений. Урок 1 Рис. 1 Рис. 2 Рис. 3...
камилия23
16.12.2022 07:08
Засіб WordArt задає: Оформлення тексту за до не стандартних параметрів Художнє оформлення тексту Оформлення тексту Графічне оформлення тексту...
ХОРОШИСТ1234567891
25.04.2022 13:32
Можливості й сервіси веб 4.0...
ZigFinde
15.08.2022 10:11
Расписания является моделью движения поездов. ответ: блок-схема графы график таблица...
shurashishkin1
17.03.2021 15:07
Морфологический разбор слов: приснился, в сторону,начинаю...
DariaTheBest5
17.03.2021 15:07
Зрушниці масою 3кг вилітає куля,швидкість якої 600м/с.яку масу має куля,якщо швидкість віддачі рушниці 4м/с?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s,i,n:integer;
begin
readln(n);
for i:=1 to n do begin
read(a[i]);
if (i mod 2 <> 0) and ((a[i] mod 5 = 0) or (a[i] mod 3 = 0)) then s+=a[i];
end;
writeln(s);
end.