Дан массив из 20 элементов, состоящий из целых случайных чисел. Числа находятся в интервале (-15, 1].
Выполните задание:
Выведите на экран в столбец такой массив, затем, найдите количество
элементов этого массива, равных 0.
rudneva04
1
15.12.2021 10:34
2
Другие вопросы по теме Информатика
КИРА28012007
15.03.2020 07:56
Alin4ikVP
15.03.2020 07:55
klara90
15.03.2020 07:51
Shizuka494
14.11.2019 09:39
nova9696
13.04.2020 12:57
andreyderdi159
09.06.2019 01:30
Инна0606
09.06.2019 01:30
Адриана1111111
09.06.2019 01:30
Популярные вопросы
- Составь схему цепи питания характерной для степной зоны...
3 - Придумать статью в газету на тему человек и природа=)...
2 - Вариант1 дорога, метель, стужа,драчун, лентяй. вариант2 отец, деревня,...
2 - Один из удобных представления графической информации с чисел...
1 - 12 кг конфет разложили поровну в 3 пакета.чему равна масса одного...
3 - Загадка. в этом деле принимают участие 2 человека,когда они это...
2 - Вмагазин 14 кг огурцов и 28 помидоров. за день продали 24 кг овощей....
2 - Семена салата проросли за 28 дней моркови на 8дней раньше чем салата...
2 - Первую часть пути поезд шел со скоростью 50 км/час, вторую часть...
1 - Запишите формы 2-го лица слов смешить, спешить, разеснить...
3
var a:array [1..20] of integer;
i,k:integer;
begin
randomize;
k:=0;
for i:=1 to 20 do
begin
a[i]:=random(16)-14;
writeln(a[i]);
if a[i]=0 then k:=k+1
end;
write(k)
end.