Ответ:
Объяснение:
Плохо, что не нарисовали стрелки маршрутов. Поэтому ABCDEFG маршрут может и не быть.
ABFG
ABFEG
ABCDEFG
ABCDEG
ACDG
НА ПРИМЕРЕ В ЭТОЙ ЗАДАЧИ
program z1;
uses crt;
const
st1='ма';
st2='ма';
var
str:string;
i,k:integer;
begin
write('введите строку: ');readln(str);
for i:=1 to length(str) do
if (st1=copy(str,i,2)) or (st2=copy(str,i,2)) then
k:=k+1;
writeln(k);
end.
1 - 9 страницы - 9 цифр
10 - 99 <span>страницы </span> - 2* 90 = 180 цифр
100 - 214 <span>страницы - 115 * 3 = 345 цифр
9 + 180 + 345 = 534 цифры всего</span>
1.
var a:array[1..100] of integer;
n,i:integer;
begin
write('N = ');readln(n);
writeln('Полученный массив:');
for i:=1 to n do a[i]:=2*i-1;
for i:=1 to n do write(a[i]:3);
writeln;
end.
Пример:
N = 5
Полученный массив:
1 3 5 7 9
2.
const n=15;
var a:array[1..n] of integer;
k,i:integer;
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
begin
a[i]:=random(21);
write(a[i]:3);
end;
writeln;
write('K = '); readln(k);
for i:=1 to n div k do write(a[i*k]:3);
writeln;
end.
Пример:
Массив A:
6 6 8 14 15 5 18 6 18 1 17 6 3 19 2
K = 3
8 5 18 6 2