Переведите программу с С++ на Pascal в 2 вариантах

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

Я написал программу, помогите, пожалуйста. Напишите её на Pascal в 2 версиях: 1)Просто напишите ту же программу на Pascal. 2)Сделайте так, чтобы программа считывала данные из файла и выводила их в файл.

#include <iostream>
#include <cmath>
using namespace std;
 
int main()
{
    float a, //Начальная высота шара
          b, //Высота конечной точки спуска шара
          r;
          cin >> a >> b;
          r = ceil ( (a - b) / 2 );
          cout << r << endl;
    return 0;
}

Заранее спасибо.

Решение задачи: «Переведите программу с С++ на Pascal в 2 вариантах»

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

var
  a, b, r: Real;
begin
  {Assign(input,'input.txt'); Reset(input);
  Assign(output,'output.txt'); Rewrite(output);}
  Read(a,b); r:=Int((a-b)/2+0.9999);
  WriteLn(r);
  {Close(input); Close(output);}
end.

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

Объявляются переменные a, b и r типа Real.
Вводятся значения переменных a и b с клавиатуры.
Вычисляется значение переменной r по формуле: r := Int((a - b) / 2 + 0.9999).
Значение переменной r выводится на экран.
Программа завершается.