11 001 100 011 1112 = 31 437
11 001 100 011 1112 = 3 31F
1 010 011 110 001 111 1012 = 1 236 175
1 010 011 110 001 111 1012 = 53 C7D
100 001 111 100 010 101 1102 = 4 174 256
100 001 111 100 010 101 1102 = 10F 8AE
Считываем сколько чисел получим(или сами решаем чему равно n), делаем цикл на считывание каждого, ищем в них мин и макс.
VAR N, i:integer;
k, min, max:real;
begin
readln(N);
for i:=1 to N do begin
readln(k);
if i=1 then begin min:=k; max:=k end
else if k<min then min:=k
else if k>max then max:=k;
end;
writeln(min-max);
end.
Лестница:
нц 7 раз
вниз
закрасить
нц 2 раз
вправо
закрасить
кц
кц
конец
Доска:
нц 4 раз
закрасить
вниз
вниз
кц
вправо
вверх
закрасить
нц 3 раз
вверх
вверх
закрасить
кц
вверх
вправо
закрасить
нц 3 раз
вниз
вниз
закрасить
кц
вниз
вправо
закрасить
нц 3 раз
вверх
вверх
закрасить
кц
вверх
вправо
закрасить
нц 3 раз
вниз
вниз
закрасить
кц
вниз
вправо
закрасить
нц 3 раз
вверх
вверх
закрасить
кц
вверх
вправо
закрасить
нц 3 раз
вниз
вниз
закрасить
кц
вниз
вправо
закрасить
нц 3 раз
вверх
вверх
закрасить
кц
<span>кон</span>
2+8 =10 - сума цифр
2×8=16 - произведение цифр