Ekranda ichma-ich joylashgan va markazlari bir nuqtada bo‘lgan 5 ta aylana chizadigan dastur tuzing

Ответ

Bitta button o‟rnatib, uning prosedurasiga quyidagini yozamiz:
procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Canvas.Brush.Color:=clred; form1.Canvas.Ellipse(50,50,450,450);
form1.Canvas.Brush.Color:=clblue; form1.Canvas.Ellipse(100,100,400,400);
form1.Canvas.Brush.Color:=clyellow; form1.Canvas.Ellipse(150,150,350,350);
form1.Canvas.Brush.Color:=clgreen; form1.Canvas.Ellipse(200,200,300,300);
form1.Canvas.Brush.Color:=clgray; form1.Canvas.Ellipse(225,225,275,275); end;

Другие задачи с этого варианта

1 2 3

Книга: Informatika fanidan imtixon savollariga javoblar 10 sinf
Билет/вопрос: №23

"Test-Uz.Ru" © 2014-2024. Информационный портал для школьников, абитуриентов, студентов и учителей

О сайте | Обратная связь