Помогите пожалуйста) 1.Составьте программу ввода с клавиатуры элементов массива a[1..10] и вывода на экран элементов с четными значениями и четными индексами. Пример ввода:4 5 6 3 9 8 4 10 7 2 2.Составьте программу,которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы,значения которых больше 5 и меньше 15.
Program enot; Var a: array [1..10] of integer; i: integer; begin for i:= 1 to 10 do read(a[i]); for i:= 1 to 10 do if (i mod 2=0) and (a[i] mod 2 =0) then write(a[i],'; '); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
