Составить программу, которая рисует 5 окружностей голубого цвета с центром в пункте (200,...

Question

Составить программу, которая рисует 5 окружностей голубого цвета с центром в пункте (200, 200) и радиусами 30, 40, 50, 60, 70

Comments

На PascalABC подойдет?

---

да

Answer 1

Program Task;
Uses GraphABC;
Var i: Integer;
Begin
SetPenColor(Color.CornflowerBlue);
For i := 3 To 7 Do
DrawCircle(200, 200, i * 10);
End.

Comments

Спасибо

---

Неправильно решена

---

Где ошибка?

---

Программа PascalABC даёт ошибку неизвестного идентификатора DrawCircle

---

Uses GraphABC; точно прописали?

---

Да

---

Незнаю, может у вас .NET Framework не установлен. Точно Pascal ABC?

---

да

---

http://rghost.ru/private/50063178/2b1cf0de163b37df56a621ddc2676455