Определите значения переменных n и m после выполнения алгоритма (см. Рис)

картинка

Объяснение:

По горизонтали:

3. Определяет действия табличного процессора при реализации вычислений (формула)

5. Цифрами нумеруются… (строки)

6. Буквами озаглавливаются… (столбцы)

8. Чтобы возвести число в квадрат необходимо применить… (апостроф)

9. Категория функций, к которой относятся функции ИЛИ, И, НЕ (логическая)

11. Первый параметр в функции ЕСЛИ (условие)

12. Документ, состоящий из листов (книга)

14. Название панели, на которой располагаются все вкладки в MS Word (лента)

15. Это может быть датой, числом, текстом и т.д. (значения)

По вертикали:

1. Они бывают смешанные, абсолютные и относительные (формулы)

2. Она состоит из столбцов и строк (таблица)

4. Общепризнанным изобретателем Эл. табл. считается Ден… (бринклин)

6. В самом низу диалогового окна Excel располагается "Строка ..." (состояния)

7. Для написания действующей формулы, пишут знак ... (равно)

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

13. Запись формулы начинается со знака… (равенства)

16. Место пересечения столбца и строки в электронной таблице (ячейка)

1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.