Решебник
- Урок 11. Задание 3.
- ...
- Урок 18. Задание 7.
- Урок 19. Задание 1.
- Урок 19. Задание 2.
- Урок 19. Задание 3.
- Урок 19. Задание 4.
- Урок 20. Задание 1.
- Урок 20. Задание 2.
Program usegraph2;
uses graphABC,crt;
var x1,y1,x2,y2:integer;
begin
SetWindowSize(600,500);
readln(x1,y1,x2,y2);
SetPenColor(clRed);
Rectangle(x1,y1,x2,y2);
End.
uses graphABC,crt;
var x1,y1,x2,y2:integer;
begin
SetWindowSize(600,500);
readln(x1,y1,x2,y2);
SetPenColor(clRed);
Rectangle(x1,y1,x2,y2);
End.