A) 2,4,6
B) 2 - хостином выделяется именно место на компьютерах, именнующихся серверами.
begin
var a, b: integer;
repeat
(a, b) := ReadInteger2('введите a и b в одной строке через пробел:');
if a >= b then Println('a должно быть меньше b');
until a < b;
Randomize;
loop 5 do
Print(Random(a, b))
end.
Var s,gl: string;
<span> i: integer;
</span><span> ps: set of integer;
</span><span>begin
</span><span> gl:='аеёийоуыэюя';
</span><span> write('строка: ');
</span><span> readln(s);
</span><span> ps:=[];
</span><span> i:=2;
</span><span> repeat
</span><span> if pos(s[i],gl)>0 then ps:=ps+[i];
</span><span> i:=i+2;
</span><span> until i>length(s);
</span><span> write('множество четных позиций с гласными: ');
</span><span> foreach i in ps do write(i,' ');
</span><span>end.
</span>
Результат работы:
строка: Это строка для проверки
<span>множество четных позиций с гласными: 20 18 10 8 14
</span>
a = []
k = int(input())
n = k * 2 - 1
a.append(1)
for i in range(1, k):
a.append(a[i - 1] + 1)
for i in range(k, n):
a.append(a[i - 1] - 1)
print(" ".join(map(str, a)))
я думаю Инна наверное
Объяснение:
Оля: Разбила Инна
Надя: да, Оля права
Коля: Это либо Ира, либо Инна