Дан массив из 20 элементов, состоящий из целых - вопрос №2090770420 от lenusya007 16.08.2020 20:50

Question

Информатика: Дан массив из 20 элементов, состоящий из целых случайных чисел. Числа находятся в интервале (-15, 1]. Выполните задание: Выведите на экран в столбец такой массив, затем, найдите количество элементов этого массива, равных 0.

lenusya007 · Answer

var a:array [1..20] of integer; i,k:integer;begin randomize; k:=0; for i:=1 to 20 dobegina[i]:=random(16)-14; writeln(a[i]); if a[i]=0 then k:=k+1end; write(k) end....