6.4.. Učitati 4 cijela broja i izračunati aritmetičku sredinu koristeći samo varijable x, s i as.

Opis rješenja: Prvi broj se učitava kao vrijednosti varijable suma. Drugi kao vrijednost varijable x. Zatim se ove dvije vrijednosti sabiraju i to postaje nova vrijednost varijable suma. Treća vrijednost se učitava kao varijabla x i dodaje varijabli suma, kao novu vrijednost sume. Četvrta vrijednost se učitava kao varijabla x i dodaje varijabli suma, kao novu vrijednost sume. Tako varijabla suma ima vrijednost razulatata sabiranja prvog, drugog, trećeg i četvrtog broja. Dijeljenjem sa brojem brojeva (4) dobija se aritmetičaka sredina ova četiri broja.

Ulaz Obrada
Ucitaj prvi broj: suma  
Ucitaj drugi broj: x suma = suma + x : REM prvi + drugi
Ucitaj treći broj: x suma = suma + x : REM prvi + drugi + treci
Ucitaj četvrti broj: x suma = suma + x : REM prvi + drugi + treci + ćetvrti
Podijeliti sumu sa 4 asr = suma / 4 : REM količnik sume
Ispisati izračunatu asr  

Tekstualni algoritam:

  1. ulaz - učitati: s : REM ucitavanje vrijednosti prvog broja
  2. ulaz - učitati: x : REM ucitavanje vrijednosti drugog broja
  3. obrada - izračunati: suma = suma + x : REM nova vrijednost sume = na staru vijednost sume dodaj x (drugi broj)
  4. ulaz - učitati: x: REM ucitavanje vrijednosti treceg broja
  5. obrada - izračunati: suma = suma + x : REM nova vrijednost sume = na staru vijednost sume dodaj x (treci broj)
  6. ulaz - učitati: x: REM ucitavanje vrijednosti cetvrtog broja
  7. obrada - izračunati: suma = suma + x : REM nova vrijednost sume = na staru vijednost sume dodaj x (cetvrti broj)
    asr = suma/4; : REM prosjecna vrijednost suma podijeljena sa 4
  8. izlaz - ispisati: asr

Listing programa:

REM 06411157
PRINT "Prvi broj: "; : REM ime varijable cija vrijednost se ucitava
INPUT suma: REM ucitavanje vrijednosti varijable sa tastature
PRINT "Drugi broj: "; : REM ime varijable cija vrijednost se ucitava
INPUT x: REM ucitavanje vrijednosti varijable sa tastature
suma = suma + x: REM nova vrijednost sume = na staru vijednost sume dodaaj x
PRINT "Treci broj: "; : REM ime varijable cija vrijednost se ucitava
INPUT x: REM ucitavanje vrijednosti varijable sa tastature
suma = suma + x: REM nova vrijednost sume = na staru vijednost sume dodaaj x
PRINT "Cetvrti broj: "; : REM ime varijable cija vrijednost se ucitava
INPUT x: REM ucitavanje vrijednosti varijable sa tastature
suma = suma + x: REM nova vrijednost sume = na staru vijednost sume dodaaj x
asr = suma / 4: REM prosjecna vrijednost suma / 4
PRINT "Aritmeticka sredina = "; asr: REM ispis vrijednosti

Ispis na ekranu:

Index