Дан целочисленный массив из 30 элементов. Элементы могут принимать значения от 0 до 1000. Допишите на алгоритмическом языке программу, которая находит и выводит количество элементов массива, которые заканчиваются на 7 и не делятся на 3. Запрещается использовать переменные, не описанные в приведенном фрагменте программы, но разрешается не использовать часть из них. нач
целтаб a[1:30]
цел i, j, k
нц для i от 1 до 30
ввод a[i]
кц
...
кон
Hasty23
3
15.06.2020 13:46
50
Другие вопросы по теме Информатика
kolya1123
12.02.2021 09:00
Totiva
03.11.2020 18:53
masha12566
19.12.2019 18:22
VolkYula69
19.12.2019 18:23
vshapovalova21
13.04.2020 19:17
FisicAnya
13.04.2020 19:17
juehxbrf
13.04.2020 19:17
Популярные вопросы
- Тақырыптық білімдер мен дағдыларды бекіту. Географиялық ақпараттар не үшін қажет?...
3 - сообщение о любом отце церкви...
2 - Как найти соотношение масс элементов? У меня N20=28:16=? Если можно, с объяснением....
3 - 1. Какой из текстов преданий вам показался более интересным? Поче- Какими народ...
3 - Правильно ли то, что в состав белков входят остатки карбоновых кислот?...
2 - Пайдаланудан толық алынған аумақты атаңыз Вариант: ҚорықҰлттық табиғи саябақТабиғи...
3 - Кызжибек жырындагы сфжет Пен окиганы салыстырып аиырмашылыгын жаз ...
2 - В5, желательно с подробным решением...
3 - с казахским. 2–тапсырма: Төмендегі сөз тіркестерінің қайсысы тұрақты сөз тіркесі,...
1 - Обведите букву другим гласным звуком....
2
ответ: (напишу на Паскале, сами транслируйте)
k := 0;
for i := 1 to 30 do
if (a[i] mod 3) <> 0 then begin
j := 10;
while a[i] div j > 0 do
j := j * 10;
if a[i] mod j = 7 then
k := k + 1;
end;
writeln(k);