Delphi dasturlash muhitida to‘g‘ri to‘rtburchak perimetrini hisoblaydigan ilova yarating.

procedure TForm1.Button1Click(Sender: TObject);
var a,b,p:integer; begin
a:=strtoint(edit1.Text); b:=strtoint(edit2.Text); p:=2*(a+b);
label3.Caption:='p='+floattostr(p); end;

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

1 2 3

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

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

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