nhập 3 số từ màn hình in ra số có giá trị lớn nhất trong 3 số
2 câu trả lời
Mình xài C+ á, Pascal hình như vẫn được đó :)
Program Bt1;
Uses crt;
Var a,b,c:real;
Begin
Clrscr;
Write ('nhap a=');
Readln (a);
Write ('nhap b=');
Readln (b)
Write ('nhap c=');
Readln (c);
If a>b Then
If a>c Then
Write ('Ket qua:',a,b,c :6 :2') [Bạn nên nhớ là trước Else không có chấm phẩy]
Else write ('So lon nhat la');
Readln;
End.
Program BTT;
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;
Write('Max = ',max);
Readln
End.
Câu hỏi trong lớp
Xem thêm