В массиве с 15 действительных чисел определить номера элементов равных 4

Question

Информатика

Малина

26 июня, 15:48

В массиве с 15 действительных чисел определить номера элементов равных 4

+1

Ответы (1)

Знаете ответ?

Павша · Answer 1

Const n=15;

var a: array[1 ... n] of integer;

i:integer;

begin

for i:=1 to n do begin a[i]:=random (10) ; write (a[i], ' ') ; end;

writeln;

for i:=1 to n do if a[i]=4 then write ('A[', i,']', ' ') ;

end.