A)подпишите вершины. б) размножить ее.
program z1;
uses GraphABC;
begin
line (100,100,200,100);
line (200,100,200,200);
line (200,200,100,200);
line(100,200,100,100);

line (150,50,250,50);
line(250,50,250,150);
line(250,150,150,150);
line(150,150,150,50);

line(100,100,150,50);
line(200,100,250,50);
line(100,200,150,150);
line(200,200,250,150);
end.
Паскаль .это куб

ivan1и2в3а4н5    2   27.05.2020 15:03    4