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

Question

Информатика

Рая

27 июня, 21:08

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

+2

Ответы (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.