Silvana Ivković posted: " Sledi nekoliko rešenih zadataka sa naredbama izbora. If naredba 1.Kreirati aplikaciju za izračunavanje vrednosti funkcije: procedure TForm1.Button1Click(Sender: TObject); Var x,y,a,b:integer; Fun:real; begin x:=StrToInt(edit1.text); y:=Str"
|

Нема коментара:
Постави коментар