Последовательное выполнение двух команд вида

a := abs(–5) + int(pi)*(11 mod 1);  a := max(a, а div 3)-int(a/2)-int(sqrt(a+4))

определит значение переменной а, равное:

Выполнение команды вида:

a := int(–5.19) + abs(–3)*(7 mod 3) – max(12 mod 5, 32 div 3)*sqrt(0.01)

определит значение переменной а, равное:

Фрагмент вида

b := abs(b); while ((а > 0) and (b > 0)) do if (а > b) then а := a mod b else b := b mod а; f := а + b; 

определит значение переменной f = 1 при значениях:

y := 0; x := 12345; for i := 1 to 4 do begin  y := y + x mod 10;  x: = int(x/10); end;

Фрагмент вида

k := 1; s := x[1]; for i := 1 to n do if (s < х[i]) then begin s := х[i]; k := i end; write(k);

выводит значение переменной k, равное:

В результате выполнения команды вида

a :=int(2.6)*(6 div 4) + (1 mod 3)*int(4/3) – 1/2.5/sqrt(0.16)

значение переменной а будет равно:

Фрагмент вида:

k := 1; while (k < 100) do k := k + k; write(k);

выведет значение k, равное:

После выполнения фрагмента вида

s := 0; i := 1; while (i < 4) do begin i := i+1; s: = s + i end

значение переменной s равно:

Значение переменной р после выполнения фрагмента вида

p := 1; i := 4; while (i > 0) do begin р := р*i; i := i – 1 end;

равно:

Значение переменной s после выполнения фрагмента вида

s := 0; i : = 1; while(i < 5) do  begin    i := i + 1; s := s + i   end;

будет равно:

j := 2; i := 1; while (i > 0) do begin if (а[i] < а[j]) then j := i; i := i – 1; end; write(i + j);