Малахия
4 год назад
Дан целочисленный массив из 30 элементов. Элементы могут принимать значения от 0 до 1000. Допишите на алгоритмическом языке программу, которая находит и выводит количество элементов массива, которые заканчиваются на 7 и не делятся на 3.Запрещается использовать переменные, не описанные в приведенном фрагменте программы, но разрешается не использовать часть из них.начцелтаб a[1:30]цел i, j, kнц для i от 1 до 30ввод a[i]кц...кон
ОТВЕТЫ
Аспарух
Oct 24, 2020
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);
870
Смежные вопросы:
