Как в паскале записать квадратный модуль?
|x-a|^2

x в квадрате можно записать тремя Очень Через математическую функцию: y:=sqr(x);

3. Через возведение в степень: y:=power(x, 2);

Abs - функция языка Паскаль, которая вычисляет модуль числа.

Sqr - функция языка Паcкаль, которая возводит число в квадрат.

program xxx;

    var z,d,k : integer;

begin

  z: =2; d: =7; k: =0;

  while (d> =z) do

    begin

      d: =d-z;

        k: =k+1

      end;

  writeln(d,'    ',k);

  readln

end.

var a: integer; beginreadln(a); write (a div 10); end.