Контрольная работа: Среда программирования программы Borland Pascal 70

Line(20,230,450,230);

Line(450,215,450,230);

SetColor(15);

Line(20,235,450,235);

Line(20,235,20,250);

SetColor(0);

Line(20,250,450,250);

Line(450,235,450,250);

SetColor(15);

Line(20,255,450,255);

Line(20,255,20,270);

SetColor(0);

Line(20,270,450,270);

Line(450,255,450,270);

OutTextxy(35,340,'время');

OutTextxy(140,340,'ответ');

SetColor(15);

Line(20,390,100,390);

Line(100,360,100,390);

Line(120,390,200,390);

Line(200,360,200,390);

SetFillStyle(1,0);

Bar(20,360,99,389);

Bar(120,360,199,389);

SetColor(15);

Line(520,430,600,430);

Line(520,430,520,460);

SetColor(0);

Line(520,460,600,460);