Заранее ! три одноклассника – влад, тимур и юра, встретились спустя 10 лет после окончания школы. выяснилось, что один из них стал врачом, другой – , а третий – юристом. один увлёкся туризмом, другой – бегом, страсть третьего – регби. юра сказал, что на туризм ему не хватает времени, хотя его сестра – единственный врач в семье, заядлый турист. врач сказал, что он разделяет увлечение коллеги. забавно, но у двоих из друзей в названиях их профессий и увлечений не встречается ни одна буква их имён. определите, кто, чем любит заниматься в свободное время и у кого какая профессия.

Влад---регби, юрист
Тимур----туризм, врач
Юра--бег, физик
Подробное решение в таблице внутри файла

1)

const
  n=40;
var
  a:array [1..n] of integer;
  i,k:integer;
begin
  Randomize;
  k:=0;
  Writeln('Исходный массив');
  for i:=1 to n do begin a[i]:=random(63)+20; Write(a[i],' ') end;
  Writeln; Writeln('Четные элементы, кратные 3');
  for i:=1 to n do
    if a[i] mod 6=0 then begin Inc(k); Write(a[i],' ') end;
  Writeln; Writeln('Отобрано элементов: ',k)
end.

Пример
Исходный массив
43 49 27 45 57 20 54 22 74 79 57 64 30 41 67 58 36 68 79 46 28 74 61 21 80 57 50 24 80 36 27 57 38 38 41 71 50 69 39 48
Четные элементы, кратные 3
54 30 36 24 36 48
Отобрано элементов: 6

2)

const
  n=20;
var
  a:array [1..n] of integer;
  i,imin:integer;
begin
  Randomize;
  Writeln('Исходный массив');
  imin:=1;
  for i:=1 to n do begin
    a[i]:=random(351)+20;
    Write(a[i],' ');
    if a[i]<a[imin] then imin:=i
    end;
  Writeln;
  Writeln('Минимальный элемент a[',imin,']=',a[imin])
end.

Пример
Исходный массив
292 54 248 310 181 210 263 284 255 156 177 340 173 39 108 144 270 40 318 155
Минимальный элемент a[14]=39

1. Почему работа компьютера невозможна без операционной системы? 
Потому что операционная система дает игроку весь возможносный инструментарий. Много ли вы сможете наработать на выключенном компьютере?
2. Какие операционные системы вы знаете?
Windows (95,98, ME, XP, 7, 10), Android, Linux, MacOS
3. Какие программы, кроме операционной системы, относятся к системному ПО? Драйвера, антивирусы, 

4. Какие системы программирования вам известны?
Pyton, C++
5. Для специалистов какой профессии предназначены системы программирования?
Программист, Специалист в области кибербезопасности