Помогите составить программу в Паскале, выводящую ** экран 50 горизонтальных полос,...

Question

Помогите составить программу в Паскале, выводящую на экран 50 горизонтальных полос, используя массивы
Точные условия: Написать программу на языке паскаль которая выводит на экран 50 горизонтальных полос
Для создания программы необходимо использовать режим graphABC
и циклический алгоритм.

Comments

Давай я лучше напишу программу, выводящую семь красных перпендикулярных линий разного цвета?

---

Приведите условие задачи дословно, именно так как оно было задано.

---

Хорошо, условия уточнил, а причём тут массивы???

Answer 1

Uses GraphABC;
Var i : Integer;
Begin
  For i:=1 to 50 do
  Line(10,i*5,100,i*5);
end.