Ккакому типу программ относят графические и текстовые редакторы, электронные таблицы? a) к прикладным b) к системным c) к инструментальным d) ни к одному из них

Excel программа, которая выводит количество чисел кратных 3, 5, 3и5 sub krat() s3 = 0 s5 = 0 s35 = 0 for i = 300 to 1000            if i / 3 = int(i / 3) then             s3 = s3 + 1         end if          if i / 5 = int(i / 5) then             s5 = s5 + 1           end if         if i / 5 = int(i / 5) and i / 3 = int(i / 3) then             s35 = s35 + 1           end if next i cells(2, 2) = s3 cells(3, 2) = s5 cells(4, 2) = s35 end sub

Var  a: array[1..100] of integer;   n, i: byte;   sum, p: integer; begin  writeln('1. случайным образом');   randomize;   write('введите размер массива: ');   readln(n);   sum: =0; p: =1;   for i: =1 to n do    begin      a[i]: =random(101)-50;       write(a[i]: 4);       sum: =sum+a[i];       p: =p*a[i];     end;   writeln;   writeln('сумма = ', sum: 5);   writeln('произведение = ', p: 5);   sum: =0; p: =1;   writeln('');   writeln('2. с клавиатуры');   for i: =1 to n do    begin    write('элемент ', i, ' = ');     readln(a[i]);     sum: =sum+a[i];     p: =p*a[i];     end;   writeln('сумма = ', sum: 5);   writeln('произведение = ', p: 5); end.