Hãy tạo cho em một thuật toán với ạ

0 bình luận về “Hãy tạo cho em một thuật toán với ạ”

1. Program Chuongtrinh;

   Uses crt;
   Var a, b,x,y,z,m: real;
   BEGIN
       Clrscr;
       Writeln(‘Nhap so thu nhat ‘); readln(a);
           x:=a;
       Writeln(‘nhap so thu hai ‘); readln(b);
           y:=b;
       While (a<>b) do
              If a>b then a:=a-b else b:=b-a;
           z:=a;
           m:=(x*y)/z;
           Writeln(‘UCLN va BCNN ‘,x,’ va ‘,y,’ la Uoc so: ‘,z:4:2,’ Boi so:  ‘,m:4:2);
       Readln;
   End.

   Bình luận

2. Nếu không có số nào trong tập hợp thì không có số cao nhất.

   Giả sử số đầu tiên trong tập hợp là số lớn nhất trong tập hợp.

   Với mỗi số còn lại trong tập hợp: nếu số này lớn hơn số lớn nhất hiện tại thì coi số này là số lớn nhất trong tập hợp.

   Khi không còn số nào trong tập hợp để lặp lại, hãy coi số lớn nhất hiện tại là số lớn nhất của tập hợp.

   Bình luận