1.Заполнить массив случайными целыми числами из диапазона [-17;20]. Посчитать количество чётных чисел. Подсказка: числа, при делении
на 2 должны давать остаток 0 (функция mod). If a[i] mod 2=0 then k:=k+1;
2.Заполнить массив случайными целыми числами из диапазона
[5;80]. Найти разность максимального и среднего арифметического.
3.Заполнить массив случайными целыми числами из диапазона
[1;8]. Посчитать количество чисел, равных максимальному.

cyganka84    2   18.12.2020 17:29    7