Оберіть об'єкти слайда фонове зображення
заголовок слайда
текстові об'єкти
макет
порядковий номер
графічний об'єкт​

Program arr;
Const n=3;
var i, j, tmp, k, z:integer;
    c:boolean;
    a:array [1..n,1..n] of integer;

begin
c:=false;
for i:=1 to n do
  for j:=1 to n do
    read(a[i][j]);
for i:=1 to n do
  for j:=1 to n do
    begin
    tmp:=a[i][j];
    for k:=i+1 to n do
      for z:=j+1 to n do
        if tmp = a[k][z] then
        c:=true;
    end;
writeln;
for i:=1 to n do
begin
  for j:=1 to n do
    write(a[i][j], ' ');
  writeln;
end;
if c = true then
  writeln('В данном массиве есть равные друг другу элементы')
  else writeln('Элементы, равные друг другу, отсутсвуют в данном массиве');
end.

1. Каким служебным словом начинается программа? B) begin
 2. Какое слово используют для описания переменных величин в программе? B) var
 3. Каким символом разделяют команды в программе? A) точка с запятой;
4. Какие из перечисленных слов могут быть именами пользователя?  D) Е6.
5. Какую команду используют для ввода данных? A) read;
 6. Какие из приведенных команд вывода данных записаны правильно?  C) write(‘y =’,y);
 7. Данные логического типа можно описать как: A) boolean;
 8. Каков результат вычисления выражения 45 mod 4? A) 1; B) 2; C) 3; D) 4. 
25 должно быть
9.В скольких позициях будет выведено значение переменной х при использовании формата вывода х:6:3? D) 6.
10. Какие из записей закона всемирного тяготения (F = ) на языке программирования являются правильными?B) F:=g*m1*m2/(r*r);
 11. Данные, значения которых являются действительными числами можно описать как:  B) double;