Program tinh;
uses crt;
var a,b,c:integer;
begin
clrscr;
write('nhap so thu nhat: ');readln(a);
write('nhap so thu hai: ');readln(b);
write('nhap so thu ba: ');readln(c);
write('tong cua ba so ',a,',',b,',',c,' la: ',a+b+c);
write('tich cua ba so ',a,',',b,',',c,' la: ',a*b*c);
readln
end.