Дан целочисленный массив из 30 элементов. элементы массива могут принимать целые значения от 0 до 1000. опишите на одном из языков программирования алгоритм, позволяющий найти и вывести количество элементов массива, десятичная запись которых содержит ровно 2 цифры, причем хотя бы одна из этих цифр – цифра 9. const n=30; var a: array [1..n] of integer; i, j, k: integer; begin for i: =1 to n do readln(a[i]); … end. нужно заполнить пропуск в программе
mariauizly88
3
14.08.2019 03:20
3
Другие вопросы по теме Информатика
TimurChik2100
04.05.2021 14:03
Arra1234566
04.05.2021 14:02
DaveDead
15.04.2020 13:21
tikmehr
15.04.2020 13:21
leratolcynova
15.04.2020 13:21
agargo228
10.05.2021 16:30
736Nikolay11111111
10.05.2021 16:32
Nikita43242
10.05.2021 16:32
Ольчик071196
10.05.2021 16:35
Популярные вопросы
- Найдите значение выражения: 2b+ a-2b^2/b если что, то a-2b^2/b это дробь а 2b...
1 - Два маляри, працюючи разом, можуть пофарбувати паркан за 8 год. за скільки годин...
2 - Рост рашада составляет 3/4 ю часть от 180 см.найдите рост рашада....
1 - 0,3*49=14,7 объясните как это решается....
3 - Найдите значение выражения 7b+ 8a-7b^2/b при a=-91 b=40...
2 - Два насоса наполняют бассейн ёмкостью в 12000 л за 100 минут. с первого насоса...
2 - Спишите, расставляя знаки препинания. объясните причину их постановки. 1) чтобы...
2 - Закончите предложения: 1 - закон гомологических рядов в наследственной изменчивости...
2 - Найдите обособленные определения и объясните причины их обособления. спишите,...
3 - Средний возраст пяти девочек билетный группы 10,4 года. после того, как в группу...
2
Var a:array [1..N] of integer;
i, j, k: integer;
begin
for i:=1 to N do
readln(a[i]);
k:=0;
for i:=1 to N do
if (a[i]>9)and(a[i]<100)and((a[i] mod 10=9)or(a[i] div 10=9))
then k:=k+1;
writeln('k = ',k);
end.
Пример (для N=10):
350
79
108
91
56
71
30
39
257
39
k = 4
N = 30
A = [randint (0 , 1001) for i in range(30)]
print(A)
for k in range(30):
if len (str(A[k])) == 2:
a = A[k] % 10
b = A[k] // 10
if a == 9 or b == 9:
print (A[k])