Hãy lập trình nhập vào 3 số nguyên dương a,b,c từ bàn phím đưa ra màn hình GTNN,GTLN trong 3 số đó

0 bình luận về “Hãy lập trình nhập vào 3 số nguyên dương a,b,c từ bàn phím đưa ra màn hình GTNN,GTLN trong 3 số đó”

1. program kaito;
   uses crt;
   var a, b, c, min, max: integer;
   begin
      clrscr;
      write(‘Nhap a: ‘); readln(a);
      write(‘Nhap b: ‘); readln(b);
      write(‘Nhap c: ‘); readln(c);
      max:=a;
      if (max<b) then max:=b;
      if (max<c) then max:=c;
      min:=a;
      if (min>b) then min:=b;
      if (min>c) then min:=c;
      writeln(‘Gia tri lon nhat la: ‘,max);
      writeln(‘Gia tri nho nhat la: ‘,min);
      readln
   end.

   CHÚC BẠN HỌC TỐT!!!

   Bình luận

2. program tim abc;
   uses crt;
   var a, b, c: integer;
   Begin 
   write (“Nhap so nguyen a = “);

   readln(a); 
   write (“Nhap so nguyen b = “);

   readln(b); 
   write (“Nhap so nguyen c = “);

   readln(c); 
   max:=a; 
   if max < b then max:=b; 
   if max < c then max:=c; 
   writeln (“So lon nhat trong 3 so la :”,max); 
   min:=a; 
   if min>b then min:=b; 
   if min>c then min:=c; 
   writeln (“So lon nhot trong 3 so la :”,min); 
   readln; 
   End

   Bình luận