viết chương trình nhập ba số a,b,c từ bàn phím.Hãy in ra màn hình số lớn nhất

0 bình luận về “viết chương trình nhập ba số a,b,c từ bàn phím.Hãy in ra màn hình số lớn nhất”

1. Program Tim_max;

   Uses crt;

   Var a,b,c,max: integer;

   Begin

   Clrscr;

   Write(‘nhapsoa’);Readln(a);

   Write(‘nhapsob’);Readln(b);

   Write(‘nhapsoc’);Readln(c);

   max:=a;

   If b>max then max:=b;

   If c>max then max:=c;

   Writeln(‘solonnhatla:’,max);

   Readln;

   End.

   Bình luận

2. program so_nao_lon_nhat;

   uses crt;

   var:a,b,c:integer;

   begin

   clrscr;

   writeln(‘moi ban nhap a:’);

   readln(a);

   writeln(‘moi ban nhap b:’);

   readln(b);

   writeln(‘moi ban nhap c’);

   readln(c);

   a:=max;

   if b>a then b=max;

   if c>b then c=max;

   writeln(‘so lon nhat la:’ ,max);

   readln;

   end.

   XIN HAY NHẤT

   Bình luận