Нужно написать 2 программы желательно в PASCAL ABC

Программа 2. Пользователь вводит две целые переменные a, b. Написать программу для выполнения следующих операций:

1 вычислить результат целочисленного деления a на b;

2 вычислить результат деления a на b;

3 вычислить результат деления a на b, вывести его дробную часть;

4 вычислить результат деления a на b, вывести его целую часть;

5 вычислить результат деления a на b, округлить его.

 

Программа 3. Предложите пользователю ввести трехзначное число, сохраните это число в одну целочисленную переменную, переверните цифры в этом числе.

1 задание.

uses crt; var a, b : real; beginreadln (a, b);writeln (a/b);writeln (frac(a/b));writeln (int(a/b));writeln (round(a/b)); readkey; end.

2 задание.

uses crt; var a: integer; st, st1, st2, st3: string; beginreadln (a);str (a, st);st1:=st[3];st2:= st[2];st3:= st[1];st:= st1+st2+st3;writeln (st); readkey; end.