Viết chương trình nhập vào ba số nguyên a, b, c. In ra số lớn nhất của 3 số đó.
0 bình luận về “Viết chương trình nhập vào ba số nguyên a, b, c. In ra số lớn nhất của 3 số đó.”
* Cách 1:
uses crt; var a,b,c,max:longint; begin clrscr; write(‘Nhap a,b,c: ‘); readln(a,b,c); max:=a; if b>max then max:=b; if c>max then max:=c; writeln(‘So lon nhat: ‘,max); readln end.
* Cách 1:
uses crt;
var a,b,c,max:longint;
begin
clrscr;
write(‘Nhap a,b,c: ‘); readln(a,b,c);
max:=a;
if b>max then max:=b;
if c>max then max:=c;
writeln(‘So lon nhat: ‘,max);
readln
end.
* Cách 2:
uses crt;
var a,b,c:longint;
begin
clrscr;
write(‘Nhap a,b,c: ‘); readln(a,b,c);
if(a>b)and(a>c)then writeln(‘So lon nhat: ‘,a);
if(b>a)and(b>c)then writeln(‘So lon nhat: ‘,b);
if(c>a)and(c>b)then writeln(‘So lon nhat: ‘,c);
readln
end.