Viết chương trình Pascal để thực hiện các công việc sau:
-Nhập từ bàn phím 4 số tự nhiên a,b,c,d
-Hiển thị ra màn hình số lơn hơn 4 số vừa nhập
Giải bởi Vietjack
Lời giải:
uses crt;
var ln,a,b,c,d:integer;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
write('d='); readln(d);
ln:=a;
if ln<b then ln:=b;
if ln<c then ln:=c;
if ln<d then ln:=d;
writeln('so lon nhat trong 4 so la: ',ln);
readln;
end.
Gói VIP thi online tại VietJack (chỉ 400k/1 năm học), luyện tập gần 1 triệu câu hỏi có đáp án chi tiết
