. Составить кроссворд по горизонтали 10 слов, по вертикали 10 слов (Темы: Основы )алгоритмизации.
​

//Pascal ABC.NET v3.0 сборка 1111

Const
 s=5;

Var
 ar:array[1..s] of integer;
 n,m,i:integer;
begin
 writeln('N');
 readln(n);
 writeln('M');
 readln(m);
 writeln('Array:');
 for i:=1 to s do
   readln(ar[i]);
 writeln('First array:');
 for i:=1 to s do
  begin
   write(ar[i]:4);
   if ar[i] div n<>0 then ar[i]:=ar[i]+m;
  end;
 writeln;
 writeln('Final array:');
  for i:=1 to s do
   write(ar[i]:4);
end. 

Пример ввода:
3
3
1
2
3
4
5
Пример вывода:
First array:
   1   2   3   4   5
Final array:
   1   2   6   7   8

//Блок-схема во вложении

1-b

2-a

3-a

4-c

5-a

Объяснение:

1. Какие задачи выполняют уровни OSI в процессе передачи данных по сети:

a) уровни выполняют одинаковые задачи, постоянно повторяя передающие сигналы по сети;

b) каждый уровень выполняет свою определенную задачу;

c) первых три уровня выполняют одинаковые задачи, последующие выполняют определенные задачи.

2. Верно ли утверждение: «Каждый уровень модели выполняет свою функции. Чем выше уровень, тем более сложную задачу он решает»:

a) верно;

b) не верно.

3. Какой уровень управляет передачей данных по сети и обеспечивает подтверждение передачи:

a) транспортный;

b) канальный;

c) сеансовый.

4. Какой уровень поддерживает взаимодействие между удаленными процессами:

А) транспортный;

b) канальный;

c) сеансовый.

5. Какой уровень управляет потоками данных, преобразует логические сетевые адреса и имена в соответствующие им физические:

a) сетевой;

b) представительский;

c) транспортный.

Вроде так)