LINIJSKA STRUKTURA Zadaci i reenja Za sve zadatke

LINIJSKA STRUKTURA Zadaci i rešenja Za sve zadatke su dati PREDLOZI rešenja. Vi možete imati drugačiji obrazac kao i programski kod. Bitno je da se rešenje može izvršiti u razvojnom okruženju tj. da RADI

1. Izračunati površinu pravougaonika ako su poznate stranice

Programski kod Procedure TForm 1. Button 1 Click ( SEnder: Tobject ); Var d, s, P : Integer; Begin d : = Str. To. Int ( Edit 1. Text ) ; s : = Str. To. Int ( Edit 2. Text ) ; P : = d * s; Label 4. Caption : = Int. To. Str ( P ); End;

2. Izračunati površinu i zapreminu kvadra ako su poznate stranice

Procedure TForm 1. Button 1 Click( SEnder: TObject ); Var a, b, c, P, V: Integer; Begin a : = Str. To. Int ( Edit 1. Text ); b : = Str. To. Int ( Edit 2. Text ); c : = Str. To. Int ( Edit 3. Text ); P : = 2 * ( a * b + a * c + c * b ); V : = a * b * c; Label 6. Caption : = Int. To. Str ( P ); Label 7. Caption : = Int. To. Str ( V ); End;

3. Na osnovu unetog broja dinara izračunati broj evra ako je 1 evro =123. 52 din

Procedure TForm 1. Button 1 Click( SEnder: TObject ); Var d: Integer; e: Real; Begin d : = Str. To. Int ( Edit 1. Text ); e : = d / 123. 52; Label 3. Caption : = Float. To. Str ( e ); End;

4. Na osnovu unetog broja evra i kursa izračunati broj dinara

Procedure TForm 1. Button 1 Click( SEnder: TObject ); Var e: Integer; k, d: Real; Begin e : = Str. To. Int( Edit 1. Text ); k : = Str. To. Int( Edit 2. Text ); d : = e*k; Label 4. Caption : = Float. To. Str( d ); End;

ZDZ Za sve zadatke je potrebno uraditi: a) predlog obrasca –nacrtati i b) napisati programske kodove za dugme (ili više ako ih ima). 1. Kreiraj aplikaciju koja vrednost u metrima preračunava u centimetre i decimetre 2. Kreiraj aplikaciju koja unet broj sati izračunava koliko je to minuta i sekundi (posebno ispisati minute i posebno sekunde – npr 1 h ima 60 minuta, 3600 sekundi) 3. Kreiraj aplikaciju koja broj megabajta (MB) preračunava u kilobajte (KB) i bajte (B) 4. Kreiraj aplikaciju koja unetu vrednost u miljama konvertuje u kilometre (1 milja=1. 6093 km) 5. Kreiraj aplikaciju koja unetu vrednost u km/h pretvara u m/s (1 km/h = 0. 2777778 m/s)