Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Vika47696
22.10.2022 17:28 •
Информатика
Ввести с клавиатуры несколько чисел,вычислить сумму чисел оканчивающихся на 4 pascal
Показать ответ
Ответ:
sumat2
06.10.2020 06:25
Var n,i,a,s:integer;
begin
writeln('Количество чисел = ');
readln(n);
for i:=1 to n do
begin
readln(a);
if abs(a) mod 10=4 then s:=s+a;
end;
writeln('s = ',s);
end.
Пример:
Количество чисел = 5
156
-654
301
104
972
s = -550
0,0
(0 оценок)
Популярные вопросы: Информатика
vgubajdullin
08.10.2020 03:55
Сколько байтов будет занимать код рисунка размером 40x50 пикселей в режиме истинного цвета? прикодировании с палитрой 256 цветов,16 цветов,с двумя цветами?...
nastiaandreeva
11.12.2022 06:30
Два числа называются взаимно простыми, если они не имеют общего натурального делителя, кроме 1. иными словами, их наибольший общий делитель равен 1. найдите количество...
Dasha78906543
31.05.2023 05:04
Покупатель решил потратить в магазине м тенге без остатка. ему необходимо приобрести три вида продукции, стоимость которых составляет x, y и z тенге соответственно....
Usdied
31.05.2023 05:04
Водной стране жил-был волшебный кузнечик, умеющий прыгать на любое расстояние. а ко¬гда он изучил тему «числовые последовательности», то решил прыгать по дороге с нумерованны¬ми...
olga15038
29.09.2022 07:03
Население города ежегодно увеличивается на k%. через сколько лет население города утроится?...
yartemok
29.09.2022 07:03
Найти сумму 4+9++m^2, лишь из слагаемых, меньших k....
nasi
26.10.2022 05:55
2. алфавит для записи сообщений состоит из 32 символов, каков информационный вес одного символа? не забудьте указать единицу измерения...
Умник1997337
26.10.2022 05:55
Алфавит для записи сообщений состоит из 32 символов, каков информационный вес одного символа? не забудьте указать единицу измерения...
darinachirkova2
24.01.2023 23:18
Решить по инфе на ! 55 . в списке все элементы различны. поменяйте местами минимальный и максимальный элемент этого списка. входные данные вводится список чисел. все...
Alinalime10
04.06.2023 19:42
Мне задали сделать программу на паскале но как перекинуть ее на флешку я не знаю.заранее за...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln('Количество чисел = ');
readln(n);
for i:=1 to n do
begin
readln(a);
if abs(a) mod 10=4 then s:=s+a;
end;
writeln('s = ',s);
end.
Пример:
Количество чисел = 5
156
-654
301
104
972
s = -550