Vieết chương trình tìm số lớn nhất trong 3 số a,b,c nhập từ bàn phím
2 câu trả lời
Program baitap;
Uses crt;
Var a,b,c,max:integer;
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.
uses crt, math;
var a, b, c: longint;
begin
clrscr;
read(a, b, c);
writeln(max(max(a, b), c));
readln; readln;
end.
Câu hỏi trong lớp
Xem thêm
