Tag: premenna

Kurz Atari Basicu 0.2

October 9th, 2009 · programovanie No comments - Tags: ,

Tento priklad je jednoduchy, v podstate nasobenie, ktore uz ovladam.

Priklad 0.2

Vypocitajte hrubu mzdu pracovnika na zaklade znalosti hodinovej mzdy a poctu odpracovanych hodin.

VSTUP – HOMZ, OH

VYSTUP – HM


10 REM HRUBA MZDA
20 INPUT "HODINOVA MZDA";HOMZ
30 INPUT "ODPRACOVANE HODINY";OH
40 HM=HOMZ*OH
50 PRINT "HRUBA MZDA=";HM
60 END

Dalej predpokladajme, ze pracovnik ma zrazky 5% z hrubej mzdy. Pouzijeme novu premennu SR. V nej bude vyska zrazky zo mzdy


10 REM CISTA MZDA - %5 ZRAZOK
20 INPUT "HODINOVA MZDA";HOMZ
30 INPUT "ODPRACOVANE HODINY";OH
40 HM=HOMZ*OH
50 SR=HM*0.05:REM VYPOCITANU HRUBU MZDU VYNASOBIME 5% A VYSLEDOK ULOZIME DO SR
60 CM=HM-SR:REM ODCITAME
70 PRINT "CISTA MZDA:";CM
80 END

V HM mame napr 12000 (48*250).. 12000*0.05 = 600, to uz je premenna SR.. Ked dalej odpocitame 12000 (HM) – 600 (SR), vide nam hodnota CM.

Program som si este skusil upravit:


10 REM VYPOCET CISTEJ MZDY SO ZVOLENYMI ZRAZKAMI V %
20 INPUT "HODINOVA MZDA";HOMZ
30 INPUT "ODPRACOVANE HODINY";OH
35 INPUT "ZRAZKY V % - 0.00 - 1.00";ZRAZKY
40 HM=HOMZ*OH:REM VYPOCET HRUBEJ MZDY
50 SR=HM*ZRAZKY:REM VYPOCET ZRAZOK
60 CM=HM-SR:REM CISTA MZDA
70 PRINT "CISTA MZDA:";CM
80 END

Kurz Atari Basicu 0.1

October 9th, 2009 · programovanie No comments - Tags: , , , ,

Je rok 2009 a je to smiesne. Ataricko som prvy krat pouzival niekedy v minulom storoci, mohol som sa ucit Basic, no nemal som na to chut, vlohy, atd. Dnes som si v Turcianskej kniznici v Martine pozical knizku Basic pro zacatecniky. Priklady mi pripadaju velmi jednoducho opisane, mam si konecne ako co precvicovat. Jednotlive priklady by som tu chcel opisat, aj mne samemu sa zidu v buducnosti. Budu usporiadane podla zlozitosti a napisem ich vzdy po tom, co ich sam pochopim.

Priklad 0.1

Jednou z najjednoduchsich uloh je zamena dvoch premennych. Ak je napriklad A=10 a B=15, tak po zamene bude A=15 a B=10. Cielom prikladu je uvedomit si, ako dochadza k priradeniu hodnoty premennej a ze po priradeni urcitej premennej je povodna hodnota premennej ztratena.

VSTUP: A, B

VYSTUP: A, B, C


10 REM ZAMENA
20 INPUT "A,B";A,B
30 C=A
40 A=B
50 B=C
60 PRINT "A=A";A,"B=";B
70 END