* Xác định bài toán :

Input : w ( cân nặng ), h (chiều cao )

Output : chỉ số BMI

* Mô tả thuật toán :

- Bước 1 : nhập w, h

- Bước 2 : bmi ← w/(2*h);

- Bước 3 : in giá trị bmi ra màn hình

- Bước 4 : 

+ Bước 4.1 : nếu bmi < 18.5 thì in ra màn hình là người gầy

+ Bước 4.2 : nếu bmi >= 18.5 và bmi < 25 thì in ra màn hình là người bình thường

+ Bước 4.3 : nếu bmi >= 25 thì in ra màn hình là ngườ béo

- Bước 5 : kết thúc

* Viết chương trình :

program sksk;

uses crt;

var w, h, bmi : real;

begin

clrscr;

write('nhap chieu cao cua co the (met) :');readln(h);

write('nhap can nang cua co the (kg)  :');readln(w);

bmi := w/(2*h);

writeln('chi so BMI la :', bmi:8:2);

if bmi < 18.5 then writeln('la nguoi gay om');

if (bmi >=18.5) and (bmi < 25) then writeln('la nguoi binh thuong');

if (bmi >= 25) then writeln('la nguoi map beo');

readln

end.

Xác định bài toán:
INPUT: W (Cân nặng), H (Chiều cao)

OUTPUT: BMI

Mô tả thuật toán bằng sơ đồ khối:

(Hình kèm)

Viết CT:

Pascal:

    program ct;
    uses crt;
    var w,h,BMI:real;
        a:string;
    begin
        writeln('Nhap w (Can nang) (Kg):'); readln(w);
        writeln('Nhap h (Chieu cao) (m):'); readln(h);
        BMI:=w/(h*2);
        writeln('BMI cua ban la: ',BMI:3:1);
        if BMI < 0 then writeln('Error!!');
        if BMI < 18.5 then a:='Ban la nguoi gay';
        if (18.5 <= BMI) and (BMI < 25) then a:='Ban la nguoi binh thuong';
        if BMI >= 25 then a:='Ban la nguoi beo';
        writeln(a);
        readln;
    end.

Python 3:

    w = float(input('Nhap w (Can nang) (Kg): '))
    h = float(input('Nhap h (Chieu cao) (m): '))
    BMI=w/(h*2)
    print('BMI cua ban la: ',round(BMI,1))
    if BMI < 0:
        a ='Error!!'
    if BMI < 18.5:
        a = 'Ban la nguoi gay'
    if (18.5 <= BMI) and (BMI < 25):
        a = 'Ban la nguoi binh thuong'
    if BMI >= 25:
        a ='Ban la nguoi beo'
    print(a)
__________________________

#Duahauvn