Ядолжна написать 6 лабораторных написать программу на паскале. дана матрица. вычислить среднее арифметическое четных элементов главной диагонали.

// pascalabc.net 3.1, сборка 1230 от 27.04.2016 begin   var n: =readinteger('n=');   var a: =matrixrandom(n,n,10,99);   var s: =0;   var k: =0;   for var i: =0 to n-1 do begin       for var j: =0 to n-1 do print(a[i,j]);       writeln;       if a[i,i].iseven then begin s+=a[i,i]; inc(k) end;       end;   if k> 0 then writeln('s=',s/k: 0: 2)   else writeln('на главной диагонали нет четных элементов') end. тестовое решение n= 8 63 13 33 90 25 21 87 91 88 88 48 13 30 59 81 27 73 23 76 77 52 19 33 97 53 87 13 74 17 35 61 70 77 96 51 61 82 33 63 22 39 88 84 54 88 73 74 69 76 26 69 14 45 80 70 54 80 36 47 38 18 22 84 62 s=75.33

12 var 3 s : string; 4 begin 5 readln (s ); 6 while pos ( 'с' ,s )> 0 do delete (s ,pos ( 'с' ,s ) ,1 ); 7 writeln (s ); 8 end. не уверена,но по-моему так

1. oc ( операционная система ) позволяет всем что происходит в компьютере.

2. windows , linux ( возможно ошибка в написании ) , mac os

3.относятся также диалоговые оболочки и сервисные программы.

сервисные программы – это программы обслуживания дисков (копирование, форматирование, «лечение» ),  сжатия файлов на дисках (архиваторы), борьбы с компьютерными вирусами и т.д. 

4. java,  turbo basic,  quick basic

5.системы программирования предназначены для программистов .