Помогите составить программу в Паскале, выводящую на экран 50 горизонтальных полос, используя массивы
Точные условия: Написать программу на языке паскаль которая выводит на экран 50 горизонтальных полос
Для создания программы необходимо использовать режим graphABC
и циклический алгоритм.
Ответы на вопрос
Ответил APALoff
0
Uses GraphABC;
Var i : Integer;
Begin
For i:=1 to 50 do
Line(10,i*5,100,i*5);
end.
Var i : Integer;
Begin
For i:=1 to 50 do
Line(10,i*5,100,i*5);
end.
Новые вопросы
Українська література,
2 года назад
Қазақ тiлi,
2 года назад
Математика,
9 лет назад
Математика,
9 лет назад