Определите значение переменных после выполнения алгоритмов
а:=9
b:=a mod 5
b:=b*10
a:=b div 5 -3
a:=a+b

b=40

a=60

Объяснение:

program xxx;

  var i, n : integer;

begin

  write ('введите число n-');

  readln (n);

  writeln('делители числа: ');

  for i : =1 to n do

    if n mod i = 0 then writeln (i)

end.

program first;

var z,d,k: integer;

begin

writeln('input z,d,k');

readln(z,d,k);

if (d> =z) then

d: =d-z

k: =k+1

writeln(d,'    ',k);

readln;

end.