Укажите основные функции операционной системы:

а) создание программной среды

б) диалог пользователя с компьютером

в)предоставление пользователю доступа к ресурсам компьютера

г) набор текста

д) работой всех устройств компьютера

е) создание изображений

несколько ответов

​

Function nok(a, b: integer): integer; var   c, d, e: integer; begin     c : = a;     d : = b;     while (d > 0) do     begin       c : = c mod d;       e : = c;       c : = d;       d : = e;     end;     result : = (a div c) * b; end; const   n = 4; var   a: array [1..n] of integer;   b: array [1..n*n] of integer;   i, j, min_: integer; begin   writeln('введите n целых чисел, только вот давайте без нулей, детсадовцы знают, что на 0 делить нельзя, плохо это');   min_ : = 2147483647;   for i : = 1 to n do     readln(a[i]);   for i : = 1 to n do     for j : = 1 to n do     begin       if (i = j) then continue;       b[i + n * (j - 1)] : = nok(a[i], a[j]);       min_ : = min(b[i + n * (j - 1)], min_);     end;   write('     ');   for i : = 1 to n do     write(i: 5);   writeln();   for i : = 1 to n do   begin     write(i: 5);     for j : = 1 to n do       write(b[i + n * (j - 1)]: 5);     writeln();   end;   writeln('min: ', min_); end.