ПОМОГИТЕ Составьте программу которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10, затем преобразовает его, увеличивая все элементы с четными значениями на 1. Если элементы с четными значениями отсутствуют, составить массив без изменений
program Пишите_на_каком_языке_отвечать; uses System.Math; var a: array [1..10] of integer; i: integer; begin for I := low(A) to High(A) do begin a[I] := randomrange(1, 10) ; if a[I] mod 2 = 0 then inc(a[I]); end; end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
