Delphi dasturlash muhitida doira yuzini hisoblaydigan ilova yarating

Bilet №17, savol №3

Javob

Bitta edit, 2ta label va 1ta button o‟rnatib, buttonning prosedurasiga quyidagini yozamiz:
procedure TForm1.Button1Click(Sender: TObject);
var r:integer; s:real; begin
r:=strtoint(edit1.Text); s=pi*r*r;
label2.Caption:=‟S=‟+floattostr(s); end;

Ko'proq vazifalar

1 2 3

Fan: Informatika fanidan imtixon savollariga javoblar 10 sinf
Bilet: №17

Telegram

Test-uz.Ru
Organish.uz
Sor-soch.com

Imtihon Javoblari

9 sinf
11 sinf

BSB Javoblari

5 sinf
6 sinf
7 sinf
8 sinf
9 sinf
10 sinf
11 sinf

CHSB Javoblari

5 sinf
6 sinf
7 sinf
8 sinf
9 sinf
10 sinf
11 sinf