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

Question

Информатика

Владислав

5 мая, 05:39

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

+1

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