Эй,человечки,помогите пожалуйста!!!! Одномерный массив из 8 элементов заполнить случайным...

Question

Эй,человечки,помогите пожалуйста!!!!
Одномерный массив из 8 элементов заполнить случайным образом числами от 10 до 20. Заменить все элементы массива меньше 15 их удвоенными значениями.Вывести на экран монитора первоначальный и преобразованный массивы в столбик (столбики должны быть расположены рядом)

Answer 1

Var a:array[1..8] of integer;i:integer;beginrandomize;for i:=1 to 8 do  begin    a[i]:=random(20-10) + 10;    write(a[i],' ');  end;  writeln;for i:=1 to 8 do  begin    if (a[i] < 15 ) then a[i]:=2*a[i];    write(a[i],' ');  end;
end.

Comments

огромное спасибооооооооо)))))

---

Одномерный массив из 6 элементов с номерами от 3 до 8 заполнить случайным образом числами от 5 до 17.Поменять местами 5-ый и 7-ой элементы массива,а 4-ый преобразованный массивы в строску.

---

напиши в личку, и задание еще раз пересмотри и перепиши, что то не сходится

---

хорошо, спасибочки тебе огромное :з