# Write a Pascal program to find all four-digit car numbers that add up to 100 in two two-digit numbers.

September 14, 2021 | education

| The first two-digit number can be found as the whole four-digit number divided by 100.

The second number can be found as the remainder when a four-digit number is divided by 100.

program number;

var i: integer;

begin

for i: = 1000 to 9999 do if (i div 100 + i mod 100 = 100) then write (i: 6)

end.