Question

Viết chương trình nhập từ bàn phím chỉ số BMI.
-        Nếu 16<=BMI<18.5, in ra thông báo “Bạn bị thiếu cân”
-        Nếu 18.5<=BMI<25, in ra thông báo “Bạn đủ cân”
-        Nếu BMI>25, in ra thông báo “Bạn đang thừa cân”.

Answer 1

var BMI: real;
begin
writeln('nhap chi so BMI: ');readln(BMI);
if (16<BMI) and (BMI<18.5) then writeln('Bạn bị thiếu cân');
if (18.5<BMI)and (BMI<25) then writeln('Bạn đủ cân');
if BMI>25 then writeln('Bạn đang thừa cân');
end.

Answer 2

var BMI: real;
begin
writeln('nhap chi so BMI: ');readln(BMI);
if (16<BMI) and (BMI<18.5) then writeln('Bạn bị thiếu cân');
if (18.5<BMI)and (BMI<25) then writeln('Bạn đủ cân');
if BMI>25 then writeln('Bạn đang thừa cân');
end.