Постройте вертикальную линию длиной 25 из точек, используя оператор for.
Какой язык?
Uses graphabc; var y: integer; begin for y:=0 to 25 do setpixel (10,y,clred); end.