Ở đây mình sẽ lấy 3 số dương nhé
var a,b,c,S : integer ;
begin
write('nhap gia tri a'); readln(a);
write('nhap gia tri b'); readln(b);
write('nhap gia tri c'); readln(c);
S:=a+b+c;
write('tong la',S);
readln
end.
var a,b,S:longint;
begin
write('a=');readln(a);
write('b=');readln(b);
s:=a+b;
writeln(' Tong so nguyen duong la: ',s);
readln;
end.