Сэйв ми, составить программу ,которая выводит на экран результат целочисленного и обычного деления двух введённых с клавиатуры целых чисел, 7 класс, информатика

Var
  a,b:integer;
begin
  Read(a,b);
  Writeln(a div b,' ',a/b)
end.

Program divd;
var
    x, y: integer;
begin
    write('Первое число: ');
    readln(x);
    write('Второе число: ');
    readln(y);
    writeln('Целочисленное деление: ', x div y);
    writeln('Обычное деление: ', (x / y):1:2);
end.