Keskustelu: Ohjelmointikysymykset: Double -muuttujasta (Pascal)

program painoindeksi;

var
   paino, pituus, indeksi: double;

begin
     writeln('Anna painosi: ');
     readln(paino);
     writeln('Anna pituutesi: ');
     readln(pituus);
     indeksi := paino / (pituus*pituus);
     writeln(indeksi);
     readln;
end.

Ja jos tuohon nyt järkeviä yksiköitä niin se antaa tulokseksi jonkun aivan ihme luvun. Ensinnäkään se ei ole oikein ja toisekseen desimaaleja on mauttomasti.

Olen vielä vähän aloittelija tämän Pascalin kanssa, joten voisiko joku neuvoa ;)
Kiitos.

Tässä linkissä hieman vinkkiä luvun muotoilusta tulostuksessa.

Ja tuo lasku: muistathan, että pituus siis metreissä eikä esim. senteissä?

Pituus tulisi antaa metreissä, että koodi toimisi. Desimaalien tulostamista voidaan rajoittaa näin:

writeln(indeksi:2:1);

Jolloin siis tulostetaan kaks lukua ennen pilkkua ja yksi pilkun jälkeen.

edit: yhyy, mä oon hidas :(

Joo, olen muistanut laittaa pituuden metreissä, eli muotoon 1.75 tms. Mutta silti iskee jonkun aivan ihme luvun.

LISÄYS: Nyt toimii kun laitoin tuon Deffin ohjeen mukaan. Kiitos!