Viết chương trình nhập vào 4 số tính tổng 4 số đó
2 câu trả lời
uses crt;
var a,b,c,d : real;
begin
write('Nhap 4 so :');
readln(a,b,c,d);
write('Tong 4 so la :',a+b+c+d:3:0);
readln
end.
Program tinh_tong;
Uses crt;
Var a,b,c,d,S: integer;
Begin
Writeln ('nhap cac so a,b,c,d:');
Readln (a,b,c,d);
S:=a+b+c+d;
Writeln ('Tong cua 4 so tren la:',S);
Readln
End.
Câu hỏi trong lớp
Xem thêm