Информатика · 8 класс Задача №3516376
А
А
цвета закодированы следующим образом 1 красный,2 зелёный,3 жёлтый.По введёному номеру цвета нарисовать произвольную окружность с заливкой этого цвета GraphABC и if
Read(n); if n=1 then SetFillStyle(SolidFill, clRed) else if n=2 then SetFillStyle(SolidFill, clGreen) else SetFillStyle(SolidFill, clYellow); Circle(200,200,50);
