Предмет: Информатика,
автор: monochr
Помогите составить программу в Паскале, выводящую на экран 50 горизонтальных полос, используя массивы
Точные условия: Написать программу на языке паскаль которая выводит на экран 50 горизонтальных полос
Для создания программы необходимо использовать режим graphABC
и циклический алгоритм.
Ответы
Автор ответа:
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.
Похожие вопросы
Предмет: Литература,
автор: kira8848
Предмет: Математика,
автор: cbetaglebovatt
Предмет: Математика,
автор: Аноним
Предмет: География,
автор: tema300032