Постройте горизонтальную линию длиной 50 из точек, используя оператор For Помогите...

Question

Постройте горизонтальную линию длиной 50 из точек, используя оператор For
Помогите пожалуйста))

Comments

Спасибо огромное. А как я могу сделать вертикальную линию?

Answer 1

Var  i: integer;
begin 
//Горизонтальная линия 
for i := 1 to 50 do   
Write('-');   

Writeln;  
 
//Вертикальная линия 
for i := 1 to 50 do   
Writeln('|');  
end.

Второе изображение в приложении выводит "точки", как и требовалось в задании

---

---

Comments

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