Viết chương trình tính tổng của 4 số nguyên A, B, C, D nhập từ bàn phím. In ra màn hình số nhỏ nhất.

2 câu trả lời

var a,b,c,d,max: integer;

t: longint;

begin

write('Nhap a; b; c; d: '); readln(a,b,c,d);

t:=a+b+c+d;

writeln('Tong 4 so tren la: ',t); 

max:=a;

if max<b then max:=b;

if max<c then max:=c;

if max<d then max:=d;

write('So lon nhat cua chung la: ',max);

readln

end.

a = int(input("nhập số a:"))
b = int(input("nhập số b:"))
c = int(input("nhập số c:"))
d = int(input("nhập số d:"))
print("min =",min(a,b,c,d))