9. Встановіть відповідність між величинами та їх типами. 1. Кількість учнів у класі
2. Середньодобова температура б. Integer
повітря
3. Назва дня Тижня
4. Список учнів

a. Real
б. Integer
повітря
B. String
г. array[1.30]of String​

// PascalABC.NET 3.0, сборка 1156 от 30.01.2016
begin
  var s:=ReadlnString('Вводите:');
  s:=s.Replace('AND','OR');
  s:=s.Replace('And','Or');
  s:=s.Replace('and','or');
  Writeln;
  Writeln(s)
end.

Тестовое решение:
Вводите: And for the Birds? Mowgli let out a kite’s whistle. And now for the Snake People. The answer was a perfect hiss. Mowgli clapped his hands happily and jumped on Bagheera’s back.

Or for the Birds? Mowgli let out a kite’s whistle. Or now for the Snake People. The answer was a perfect hiss. Mowgli clapped his hors happily or jumped on Bagheera’s back.

//Pascal ABC.NET v3.1 сборка 1219
Const 
n=15;

 Var
 ar:array[1..n] of integer; 
sum,i:integer;
begin
 randomize;
 writeln('First array:');
 for i:=1 to n do
  begin
   ar[i]:=random(2,23);
   write(ar[i]:4);
   sum:=sum+sqr(ar[i]);
  end;
 writeln;
 writeln('Sum=',sum);
 writeln('Final array:');
 for i:=1 to n do
  begin
   ar[i]:=ar[i]+ar[n];
   write(ar[i]:4);
  end;
end.

Пример работы программы:
First array:
  19  21  10  13   7  13   9   2  22  20  10   7  17   7  22
Sum=3229
Final array:
  41  43  32  35  29  35  31  24  44  42  32  29  39  29  44