Определите, есть ли в массиве числа от 3 до 7. Укажите их номер.
Ответы на вопрос
Ответил Аноним
0
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.
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.
Новые вопросы