Viết chương trình nhập từ bàn phím 2 số nguyên ab và in ra màn hình số lớn nhat và số nhỏ nhất
 2 trả lời
Viết chương trình nhập vào 2 số nguyên a và b từ bàn phím và in ra màn hình số nhỏ nhất trong 2 số đó ( sử dụng chương trình con để tìm số nhỏ nhất trong 2 số a và b) Các câu hỏi tương tự
Xem chi tiết
Xem chi tiết
Xem chi tiết
Xem chi tiết
Xem chi tiết
Xem chi tiết
Xem chi tiết
Xem chi tiết
Xem chi tiết
viết chương trình nhập vào 2 số nguyên a và b. In ra màn hình giá trị lớn nhất. Giup mình với ạ
Viết chương trình nhập vào 2 số nguyên a và b. In ra màn hình giá trị lớn nhất. uses crt; var a,b:integer; begin clrscr; write('a='); readln(a); write('b='); readln(b); if a=b then writeln('vui long nhap hai so khac nhau') else if a>b then writeln('so lon nhat la: ',a) else writeln('so lon nhat la: ',b); readln; end.
uses crt; var a,b:integer; begin clrscr; write('a='); readln(a); write('b='); readln(b); if a=b then writeln('vui long nhap hai so khac nhau') else if a>b then writeln('so lon nhat la: ',a) else writeln('so lon nhat la: ',b); readln; end.
uses crt; var a,b:integer; begin clrscr; write('a='); readln(a); write('b='); readln(b); if a=b then writeln('vui long nhap hai so khac nhau') else if a>b then writeln('so lon nhat la: ',a) else writeln('so lon nhat la: ',b); readln; end.
uses crt; var a,b:integer; begin clrscr; write('a='); readln(a); write('b='); readln(b); if a=b then writeln('vui ***g nhap hai so khac nhau') else if a>b then writeln('so *** nhat la: ',a) else writeln('so *** nhat la: ',b); readln; end.
uses crt; var a,b:integer; begin clrscr; write('a='); readln(a); write('b='); readln(b); if a=b then writeln('vui long nhap hai so khac nhau') else if a>b then writeln('so lon nhat la: ',a) else writeln('so lon nhat la: ',b); readln; end.
Viết chương trình giải ptrinh tìm số lớn nhất trong 3 số nguyên a, b, c ( a,b,c nhập từ bàn phím )
uses crt; var a,b:integer; begin clrscr; write('a='); readln(a); write('b='); readln(b); if a=b then writeln('vui ***g nhap hai so khac nhau') else if a>b then writeln('so *** nhat la: ',a) else writeln('so *** nhat la: ',b); readln; end.
uses crt; var a, b : int64; begin clrscr; write('NHAP SO NGUYEN A: '); readln(a); write('NHAP SO NGUYEN B: '); readln(b); if a = b then writeln('HAI SO NAY BANG NHAU') else if a > b then writeln('SO *** NHAT LA: ',a) else if a < b then writeln('SO *** NHAT LA: ',b) readln end.
uses crt;
|
