1.)заполните числовой массив из 8 элементов с клавиатуры и выведите на экран частное 5 и 3 элементов 2)дан массив из 6 элементов(заполните через датчик случайных чисел: числа от 8 до 12)из всех его элементов рассчитать квадратный корень. 3)посчитать сколько в массиве из 30 чисел(числа от - 100 до 100)кратных 5

1)
var
   arr: array[0..7] of Integer; 
   i : Byte;
begin 
   for i := 0 to 7 do 
   begin   
      write('Vvedite zna4enie ', i+1, ' elementa: ');
      readln(arr[i]); 
   end; 
writeln('4astnoe 5 i 3 = ', arr[4] / arr[2]);
end.