Для организации перевода числа а из десятичной в -ричную систему счисления, программа на Паскале (начальный фрагмент которой приведен ниже)

… readln (a, n); i:=0; while (a<>0) do begin i:=i+1; x[i]:=a mod n; a:=a div n; end; …

должна быть продолжена так:

Правильный ответ:

массив размерностью , хранящий цифры n-ричного числа в обратном порядке, нужно инвертировать

нужно сложить содержимое элементов массива размерностью , содержащего цифры -ричного числа

нужно сложить произведения элементов массива размерностью (содержащего цифры -ричного числа) на 10 в степенях .

из массива необходимо удалить "неиспользованные" элементы

• # Способы вычисления площади выпуклой фигуры:
• # В результате выполнения программы на Паскале, фрагмент которой приведен ниже, произойдет выборка элементов из исходного массива, соответствующая такому основному типу комбинаторных групп: … for i:=1 to n do for j:=1 to n do writeln (A[i], A[j]); …
• # Назначение программы на Паскале… var a: string; b, i, st, n, s, x, k:integer; begin readln (a); readln(b); n:=length(a); s:=0; st:=1; for i:=1 to n do begin val (copy(a,n-i+1,1),x,k); s:=s+x*st; st:=st*b; end; writeln (s); end.
• # Что выведется на экран в результате работы программы, фрагмент которой приведен ниже: … stroka:='(5+y)*(x-4)'; n:=length (stroka); s:=0; for i:=1 to n do begin a[i]:=copy(stroka, i, 1); flag[i]:=0; end; for i:=1 to n do begin if a[i]="(" then flag [i]:=1; if a[i]=")" then flag [i]:=-1; end; for i:=1 to n do begin s:=s+flag [i]; if s<0 then x:=1; end; if (s=0) and (x=0) then writeln ('верно') else writeln ('неверно'); …
• # Какое тело цикла необходимо создать, чтобы двумерный массив в результате выполнения программы на Паскале (фрагмент ниже)… … x:=1; for j:=1 to n do for i:=1 to j do begin ??? end;… … заполнялся так: \begin{matrix} 1&2&4&7\\ 3&5&8&0\\ 6&9&0&0\\ 10&0&0&0 \end{matrix}