Напишите программу для создания массива а из десяти целых чисел, элементы которого вводятся с клавиатуры. в программе подсчитать k - количество элементов массива, значение которых превышает 12.
Serega20032017
3
04.10.2019 15:10
29
Другие вопросы по теме Информатика
лиза1585
22.08.2019 04:10
Марина0506
13.04.2020 19:12
Аркаша2281337
13.05.2020 18:50
vtkmlth
21.05.2020 15:07
AlinaWinter2015
21.05.2020 09:30
iraermila
03.09.2019 19:10
Mykolaj8
17.04.2019 01:20
artemmishin7777777
17.04.2019 01:20
Популярные вопросы
- Сочинение на тему: можно ли простить измену?...
1 - Во многом именно использованию прилагательных писатели эти великолепные картины...
2 - Написать 7 предложений о своей родине на языке...
1 - Написать очерк. про любого человека ( неважно кого )...
2 - Составить 6-7 простых предложений ( не замысловатых) на татарском языке....
1 - Числитель и знаменатель рациональной дроби написаны наудачу. какова вероятность...
2 - Мебельная фабрика делает а комплектов мебели в год.в каждом комплекте 6 стульев.сколько...
1 - Натрий это меттал? натрий это меттал?...
2 - При каких значениях a уровнение имеет 2 корня ax^2 - 3x - 4 = 0...
1 - Проанализируй животных по типу питания...
3
var
a: array[0..9] of integer;
k, i: integer;
begin
k := 0;
for i := 0 to 9 do
begin
readln(a[i]);
if a[i] > 12 then k += 1;
end;
writeln(k);
end.