Hãy xác đinh bài toán và mô tả thuật toán : Nhập vào cân nặng của An và Minh . Thông báo xem ai nặng hơn

0 bình luận về “Hãy xác đinh bài toán và mô tả thuật toán : Nhập vào cân nặng của An và Minh . Thông báo xem ai nặng hơn”

1. -Xác định bài toán

   +Input: cân nặng của An và Minh

   +Output: An nặng hơn hoặc Minh nặng hơn

   -Thuật toán

   +B1: Nhập cân nặng An, Minh

   +B2: Nếu An > Minh thì thông báo An nang hon

   +B3: Nếu Minh > An nặng hơn thì thông báo Minh nang hon

   +B4: Kết thúc thuật toán

   uses crt;
   var an,minh:byte;
   begin
   clrscr;
   write(‘Nhap can nang cua ban An: ‘);readln(an);
   write(‘Nhap can nang cua ban Minh: ‘);readln(minh);
   if an > minh then writeln(‘Ban An nang hon’) else writeln(‘Ban Minh nang hon’);
   readln
   end.

   Bình luận

2. Program can_nang

   uses crt;
   var an,minh:byte;
   begin
   clrscr;
               write(‘Nhap can nang cua ban An: ‘);

               readln(an);
               write(‘Nhap can nang cua ban Minh: ‘);

               readln(minh);
               if an > minh then writeln(‘Ban An nang hon’) else writeln(‘Ban Minh nang hon’);
   readln
   end.

   Bình luận