НУ конечно сканер! сканер это отдельный предмет который используется для скидывания изображение реальных предметов в компьютер!
Ответ:
7
Объяснение:
p:=Pos('o',s);
индекс начала подстроки 'o' в строке s, база = 1
Program E08;
uses crt;
var
X: array[-1000..1000] of integer;
S,i,k: integer;
begin
clrscr;
writeln('Введите массив X:');
for i:=1 to 10 do
begin
write('X[',i:2,'] ==> ');
readln(X[i])
end;
for i:=1 to 10 do
write(X[i],' ');
writeln;
K:=0;
for i:=1 to 10 do
begin
S:=X[i] mod 3;
if S = 0 then
K:=K+1
end;
writeln('Ответ: ',K)
<span>end.</span>
Procedure factorize(n: longint);
var divisor: longint;
begin
divisor := 2;
while divisor * divisor <= n do
if n mod divisor = 0 then
begin
n := n div divisor;
writeln(divisor);
end
else inc(divisor);
if n <> 1 then writeln(n);
end;
var n: longint;
begin
readln(n);
factorize(n);
end.
Как я понял i и j обозначают строки и столбцы массива 5Х5
Тогда Q встречается в 3 строке и 4 столбце. И в 4 строке в 5 столбце. Из предложенных вариантов подходят а и c так как индекс -это будет i =3 , j = 4 для варианта а и i = 4, j=5 для варианта с