24. So sánh chiều cao của d bạn Lan và Trang rồi in kết quả ra màn hình a) mô tả thuật toán b) viết chương trình

0 bình luận về “24. So sánh chiều cao của d bạn Lan và Trang rồi in kết quả ra màn hình a) mô tả thuật toán b) viết chương trình”

1. a/

   thuật toán:

    b1: nhập chiều cao của Lan (dl) và Trang (dt)

    b2: so sánh và in ra màn hình hợp lí

            if dl>dt then write (‘Lan cao hon Trang’);

            if dl<dt then write (‘Trang cao hon Lan’);

            if dl=dt then write (‘Lan cao bang Trang’);

   b/chương trình

   uses crt;

   var dl,dt: integer;

   begin

    clrscr;

    write (‘nhap chieu cao cua Lan(cm): ‘);   readln (dl);

    write (‘nhap chieu cao cua Trang(cm): ‘);   readln (dt);

            if dl>dt then writeln (‘Lan cao hon Trang’);

            if dl<dt then writeln (‘Trang cao hon Lan’);

            if dl=dt then writeln (‘Lan cao bang Trang’);

   readln;

   end.

    

   Bình luận