1) написать программу для вычисления произведения 30 случайных натуральных чисел. каждое число принадлежит промежутку от 0 до 10. 2) дано натуральное число n. определить сколько в числе нулей. 3) определить значение переменной s после выполнения следующих операторов, объяснить, как оно получилось. s: =0; i: =0; while i< 5 do i: =i+1; s: =s+1/i; 4) найти ошибки в следующем фрагменте программы, если переменные описаны следующим образом: var x, y: real; как их исправить. y: =0; for x: =0. 1 to 0. 9 do y: =y+sin(x);