6.1..Učitati koordinate dvije tačke M1(x1,y1) i M2(x2,y2) i izračunati pojedinačnu udaljenost tačaka od koordinatnog početka.
Opis rješenja: Program izvodi učitavanje koordinata tacaka M1 i M2 i izračunava pojedinacni razmak tacaka i koordinatnog pocetka.
Opis programa: Prva naredba je REM - naredba komentara. REM je skraćenica od engleske riječi REMARK (komentar). Naredba INPUT izvodi ispis navedenog teksta u navodnicima ("Brojevi") i učitavanje vrijednosti varaijabi x1,y1 i x2,y2. Naredba 30 izvodi izračunavanje vrijednosti d1 pomocu pitagorine teoreme, kao i naredba 40 za d2 i na kraju je ispis.
Listing programa:
REM:06412010 INPUT "Unesi koordinate za tacku M1:", x1,y1 INPUT "Unesi koordinate za tacku m2:", x2,y2 d1 = SQR(x1^2 + y1^2) d2 = SQR(x2^2 + y2^2) PRINT "Udaljenost tacke M1 od koordinatnog pocetka je:";d1 PRINT "Udaljenost tacke M2 od koordinatnog pocetka je:";d2 END
Ispis na ekranu:
 |
 |
 |
 |
 |
 |
 |
