Заполните массив (23) случайными числами в интервале [0,100] и подсчитайте отдельно среднее значение всех элементов, которые < 50, и среднее значение всех элементов, которые ≥50. на языке паскаль ! 15б.

Var a: array [1..23] of integer; i,s1,s2,k1,k2: integer; begin for i: =1 to 23 do begin a[i]: =random (101); write (a[i],' '); if a[i]< 50 then begin s1: =s1+a[i]; k1: =k1+1 end else begin s2: =s2+a[i]; k2: =k2+1 end end; writeln; writeln ('среднее арифметическое < 50 ',s1/k1); writeln ('среднее арифметическое > =50 ', s2/k2) end.

60,111100,3c,74

с компьютера можно редактировать фотографии, создавать тексты, пользоваться интернетом, создавать графические изображения,

делать видео монтаж и.т.д.

  если использовать компьютер не по назначению или скачивать с интернета файлы опасные для компьютера может быть компьютерный вирус. чтобы не было вируса можно приобрести антивирус или вообще не скачивать что попало.