Ответ:

program ab;

var

 a, b: integer;

begin

 write('Введите значения A и B: ');

 read(a, b);

 writeln('Квадрат величины A: ', sqr(a));

 writeln('Квадратный корень величины A: ', sqrt(a));

 writeln('Целая часть при делении двух целых величин A и B: ', a div b);

 writeln('Остаток от деления при делении двух целых величин A и B: ', a mod b);

end.

Объяснение:

program ab;  // Название программы

var

 a, b: integer;  // Целочисленные переменные для хранения значений

begin  // Начало программы

 write('Введите значения A и B: ');  // Вывод сообщения

 read(a, b);  // Считываем значения переменных с клавиатуры

 writeln('Квадрат величины A: ', sqr(a));  // Вычисляем квадрат переменной A

 writeln('Квадратный корень величины A: ', sqrt(a));  // Вычисляем квадратный корень переменной A

 writeln('Целая часть при делении двух целых величин A и B: ', a div b);  // Вычисляем целую часть при делении двух целых величин A и B

 writeln('Остаток от деления при делении двух целых величин A и B: ', a mod b);  // Вычисляем остаток от деления при делении двух целых величин A и B

end. // Конец программы