Создать в PascalABC программу, содержащую 5 различных графических примитивов, координаты в графических примитивах выразить относительно переменных Х и Y.
Program avto;
Uses crt,GraphABC;
Var x,y:integer;
Begin
X:=300; y:=200;
SetPenColor(clgray);
Circle(x+10,y+50,20); //колесо
..
End.

KeselMeme    2   19.04.2020 14:52    0