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

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.



One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.