Решебник
- Урок 11. Задание 3.
- ...
- Урок 18. Задание 6.
- Урок 18. Задание 7.
- Урок 19. Задание 1.
- Урок 19. Задание 2.
- Урок 19. Задание 3.
- Урок 19. Задание 4.
- Урок 20. Задание 1.
Program usegraph1;
uses graphABC,crt;
var r:integer;
begin
SetWindowSize(600,500);
readln(r);
SetPenColor(clGreen);
Circle(300,200,r);
End.
uses graphABC,crt;
var r:integer;
begin
SetWindowSize(600,500);
readln(r);
SetPenColor(clGreen);
Circle(300,200,r);
End.