Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
AngelIv
23.08.2021 00:21 •
Информатика
Напишите программу паскаль 40 найти сумму нечётных чисел кратных 3 которые заканчиваются цифрой 5.
Показать ответ
Ответ:
45r77yf
08.10.2020 21:09
Var
i,s,n,m:integer;
begin
Write('Количество чисел равно ');
Readln(n);
s:=0;
Writeln('Введите все числа');
for i:=1 to n do
begin
Read(m);
if (abs(m mod 10)=5) and (m mod 3=0) then s:=s+m
end;
Writeln('s=',s)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Tyan789
13.03.2023 07:33
По какой дорожке нужно пройти красной шапочке, чтобы не встретить серого волка, если известно, что один указатель истинный, а другой ложный. сарый волк или серый волк или бабушка...
Айхан111111
02.11.2021 18:37
Информатика 4 класс формы записи алгоритмов . как посадить дерево блок-схема...
Krasotcakotik
22.03.2023 19:38
Паскаль.линейная программа. треугольник задан координатами вершин а(х1, у1, z1), b(x2, y2, z2), c(x3, y3, z3). составить схему вычисления длины медианы аа1. исходные данные опишите...
satanbeat
10.05.2023 04:00
Конспект по онгонизатор вычисления...
mgatron
27.12.2020 17:56
1.зачем в процессе передачи данных осуществляется их сжатие 2.наиболее распространенные модемы в наше время контрольная завтра! 30...
sebtetfGек5у
27.12.2020 17:56
От разведчика была получена шифрованная радиограмма, переданная с использованием азбуки морзе. при передаче радиограммы было потеряно разбиение на буквы, но известно, что в радиограмме...
serega228002
27.01.2023 11:29
Из предложенных ниже вариантов выберите словосочетание. * Светит солнце Солнечный свет Яркое солнце печет...
427v2
16.01.2020 14:12
по истории Выбери правильный ответ. 1. Гуманистами называли: 1) жителей больших городов 2) служителей католической церкви 3) людей, придерживающихся светского взгляда на окружающий...
Кристина15551
29.04.2020 18:29
Из приведенных ниже примеров выберите два примера дискретных случайных величин:а)продолжительность жизни человекаб) количество мальчиков родившихся в каком- либо месяцев) количество...
dron1131
08.08.2020 16:23
балов Наиболее острая форма инфляции, которая выражается в среднемесячном темпе прироста общего уровня цен на 100% и выше Регулярность чередований фаз циклических подъемов и...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,s,n,m:integer;
begin
Write('Количество чисел равно ');
Readln(n);
s:=0;
Writeln('Введите все числа');
for i:=1 to n do
begin
Read(m);
if (abs(m mod 10)=5) and (m mod 3=0) then s:=s+m
end;
Writeln('s=',s)
end.