Россе Вариант 12 1. Дан рекурсивный алгоритм: procedure F(n: integer); begin writeln("*'); if n > 0 then begin writeln('*'); F(n-1); F(n div 2); end end; Сколтко символом звехдочка юудет напечатаннт на экране привыполнении вызова F(5) РЕШИТЕ
Const n=4; m=5; var a:array[1..n,1..m] of integer; i,j,max,min:integer; begin Randomize; writeln('Исходный массив:'); for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(201)-100; write(a[i,j]:4); end; writeln; end; max:=a[1,1]; min:=a[1,1]; for i:=1 to n do for j:=1 to m do begin if a[i,j]>max then max:=a[i,j]; if a[i,j]<min then min:=a[i,j]; end; writeln('max = ',max,' min = ',min); writeln('Среднее арифметическое = ',(max+min)/2); end.
1. Выберите лишнее. C. Paint — это графический редактор, остальные текстовые
2. Как можно посмотреть количество страниц в открытом документе? D. В строке состояния.
3. Изменить масштаб просмотра документа можно: В. В строке состояния.
4. Как вызвать контекстное меню? А. Щёлкнуть правой кнопкой мыши на нужном элементе документа.
5. Команды по сохранению документа: В. Находятся в меню Файл. С. Находятся в меню кнопки Office — зависит от версии, в Word 2016 (последней на момент публикования вопроса) кнопку Office поменяли на меню Файл
6. Команда Вид-Перейти в другое окно нужна для: D. Перехода по открытым документам.
Всего звёздочек = 40
Объяснение:
var
b : integer;
procedure F(n: integer);
begin
inc(b);
writeln('*');
if n > 0 then begin
inc(b);
writeln('*');
F(n-1);
F(n div 2);
end
end;
var
a : integer;
begin
b:=0;
a:=5;
f(a);
writeln('Всего звёздочек =', b);
end.