Найти такое число C, чтобы (C-A) было равно B - Free Pascal

Формулировка задачи:

Помогите пожалуйста решить задачу на Free Pascal. ПЛИЗ!!!Арифметика Имя входного файла input.txt Имя выходного файла output.txt Максимальное время работы на одном тесте 2 секунды Ограничение по памяти 64 Мб Заданы два числа A и B. Необходимо найти такое число C, чтобы (C-A) было равно B. Формат входных данных Во входном файле записано два целых числа A и B (-2000000000 ≤ A, B ≤ 2000000000). Формат выходных данных В выходной файл выведите число C.

Решение задачи: «Найти такое число C, чтобы (C-A) было равно B»

Листинг программы

Real        platform dependant             ???           4 or 8
Single      1.5E-45 .. 3.4E38              7-8           4
Double      5.0E-324 .. 1.7E308            15-16         8
Extended    1.9E-4932 .. 1.1E4932          19-20         10
Comp        -2E64+1 .. 2E63-1              19-20         8
Currency    -922337203685477.5808  922337203685477.5807  8

Объяснение кода листинга программы

Вот что получается:

Установка типа данных переменной A.
Установка типа данных переменной B.
Установка типа данных переменной C.
Вычисление разности (C-A) и присвоение результата переменной B.
Вывод значения переменной B.
Завершение работы программы.