Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ktjy123
13.07.2020 01:40 •
Информатика
Дан массив целых чисел. найти номера элементов, окан чивающихся цифрой 0 (известно, что такие элементы в мас сиве есть) в паскале
Показать ответ
Ответ:
Эльза132004
02.07.2020 23:53
Var
mas:array[1..100] of integer;
i,n:integer;
begin
readln(n);
for i:=1 to n do
read(mas[i]);
for i:=1 to n do
begin
if mas[i] mod 10 = 0 then
write(i,' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
nekit2409
02.05.2021 09:33
Какому состоянию электронной системы соответствует 0...
хели3
11.05.2020 00:23
Доклад на тему Информация в технике...
kerisolomia
04.09.2021 07:36
Продам аккаунт за 500тг или за 100рублей все эпики все сверхредкие все редкие 3мифика много скинов донатил много гаджетов почти на всех 1лега писать в вацап номер...
Алла1666666
12.05.2020 06:22
мәтін мазмұны бойынша кестені толтырыңдар тірек сөздер негізгі ой ортақ ой Д.Қонаевтың пікірі Ә нүрпиісовтың пікірң...
Sofya768Miller
05.09.2021 23:42
Борпылдақ паренимха атқаратын қызметі?...
Vandannc
11.03.2023 05:15
Сочи второе задание напиши про гаджеты которые были 10 лет назад 10 предложений и которые были в этом году 10 предложений...
tanya150452
11.03.2023 05:15
Задание по немецкому На первом фото пункт с На втором фото упражнение 7 пункты d, e...
Dimaska123
11.03.2023 05:15
Вы генеральный директор Акционерного общества, которое имеет уставный капитал на сумму 600 тыс. руб. и минимальный размер резервного фонда. Номинальная стоимость одной...
kolafeoktistovp0aj9j
13.02.2023 13:00
Упростите выражение 1) (4а³b²)³÷(2а²b)² 2) (9х²у)³÷(3ху)²3) (-аbс²)⁵÷(-а²bс³)²;4) (-x²y³z)⁴÷(xyz).кто сделает подпишусь ну...
karinaeruslanov
11.07.2021 23:22
Какое растение является вечнозелёным?ответ:1.Каштан2.Пальма3.яблоня4. клён...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
mas:array[1..100] of integer;
i,n:integer;
begin
readln(n);
for i:=1 to n do
read(mas[i]);
for i:=1 to n do
begin
if mas[i] mod 10 = 0 then
write(i,' ');
end;
end.