Arkadaşlar merhabalar pascalı yeni yeni öğreniyorum.Bir sorunum var.Vücut kitle endeksini hesaplamaya çalışıyorum fakat sorun çıkıyor,(Boyu 1.80 şeklinde yazamıyorum 180 şeklinde oluyor ve hangi değişken türünü yazacağım bilemedim, real yazınca küsürat fazla oluyor) vücut kitle endeksinin formülü aşağıdadır.Yardımlarınızı bekliyorum.
Vücut Kitle Endeksi nasıl hesaplanır?
Vücut kitle endeksi, vücut ağırlığınızın boy uzunluğunuzun karesine bölünmesi ile elde edilir. Yazdığım Kod. uses crt;
var
boy,kilo:word;
indeks:real;
begin
clrscr;
writeln('Boy ve kilonuzu girin...');
readln(boy,kilo);
indeks:=boy*sqr(kilo);
writeln('Kitle Endeksiniz : ',indeks);
readln;
end.Sorun Çözüldü.Vücut Kitle Endeksi hazırlama Programı Pascal ile aşağıdaki kodlarla yapılabilir.
Alıntı
Başka Forumdan @alper307 adlı arkadaş çok yardımcı oldu sağolsun.
Alıntı
program indekshesaplama;
uses crt;
var indeks,boy,kilo:real;
begin
clrscr;
writeln('boy ve kilo giriniz');
readln(boy,kilo); indeks :=kilo/(boy*boy);
writeln('kitle indeksiniz :',indeks:2:1);
readln;
end.
