Каковы будут значения переменных a и b после выполнения операций присваивания (начальное значение a=5)? a: = a+1; b: =sqr(a); a: =sqrt(b)+a;

A(5) = 5 + 1 = 6 b = a(6)^2 = 36 a =  √b(36) + 6 = 12

// pascalabc.net 3.1, сборка 1219 от 16.04.2016 begin   var n: =readinteger('кол-во элементов: ');   var a: =arrrandomreal(n,-10,20); a.println;   writeln('с округлением если |x|< 1');   for var i: =0 to n-1 do       if abs(a[i])< 1 then a[i]: =round(a[i]);   a.println end. тестовое решение: кол-во элементов: 10 -0.751956142835299 5.95022566427953 3.58861613254464 7.42331713783709 -4.75036238075717 -9.41228387384316 -0.700975591643235 3.85500546258642 -1.94321916994789 19.3021338336645 с округлением если |x|< 1 -1 5.95022566427953 3.58861613254464 7.42331713783709 -4.75036238075717 -9.41228387384316 -1 3.85500546258642 -1.94321916994789 19.3021338336645

Var       n, i, prev: integer; function issimplenumber(n: integer): boolean; var       i: integer; begin       issimplenumber : = true;             for i : = 2 to round(sqrt(n) + 1) do               if n mod i = 0 then begin                       issimplenumber : = false;                       exit;               end; end; begin       read(n);       prev : = 0;             for i : = n to 2 * n do               if issimplenumber(i) then                       if prev = 0 then                               prev : = i                       else if i - prev = 2 then begin                               writeln(i, ', ', prev, ' - близнецы');                               halt;                       end                       else prev : = i;             writeln('близнецов нет'); end.