Определите, есть ли в массиве числа от 3 до 7. Укажите их номер.

Question

Информатика

Эмилиана

25 марта, 18:20

Определите, есть ли в массиве числа от 3 до 7. Укажите их номер.

+2

Ответы (1)

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

Толюня · Answer 1

Uses crt;

const n = 5;

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

i:integer;

begin

for i:=1 to n do

readln (a[i]) ;

isize:=0;

for i:=1 to n do

if ((a[i]>2) and (a[i]<8)) then

writeln (i) ;

end.