Количество чисел = 8^2-8 = 64-8 = 56
1. файл, фонограф
2. береста
3. хранения
4. долговременной
5. оперативная
6. информация
7. фотография
8. камень
9. папирус
10. Китай
11. пергамент
Будем считать, что ввод значения = 0 признак окончания ввода членов последовательности. Тогда можно попробовать так:
var a,max,maxn,n: integer;
begin
readln(a);
max:=a; maxn:=1;n:=1;
while a<>0 do begin
readln(a);
n:=n+1;
if a>max then begin
max:=a; maxn:=n;
end;
end;
writeln('Максимальный : ',max,' номер : ',maxn);
end.
<h2>Задание </h2>
Сложить E43C и D15A в шестнадцатеричной системе счисления
<h2>Решение</h2>
Записываем два числа в столбик и складываем по разрядам. Первым действием складываем C и A. Вспомним, какие числа содержит в себе шестнадцатеричная система счисления: от 0 до 9, а также буквы A, B, C, D, E и F, соответственно равные 10, 11, 12, 13, 14 и 15. Итак, складываем C и A: 12 + 10 = 22. Так как мы работаем в шестнадцатеричной системе счисления, то происходит переполнение разряда (аналогия - в нашей, десятичной системе счисления такое переполнение происходит, когда мы складываем, например, 5 и 6: 5 + 6 = 11 - происходит переполнение нашей системы и мы включаем десятки). Нужно разложить 22 на сумму числа и 16. 16 + 6 = 22. Записываем под этими разрядами 6 и ставим точечку над следующим разрядом. Переходим к следующему: 3 + 5 = 8. Переполнения нет. А у нас ещё точечка: 8 + 1 = 9. Записываем под этими разрядами 9. Переходим к следующему: 4 + 1 = 5. Записываем. Следующий (последний): E + D = 14 + 13 = 27 = 16 + 11. 11 в шестнадцатеричной системе счисления - это B. Единичку записываем в следующий разряд (а поскольку его нет - в самое начало получившегося числа).
<h2>Ответ</h2>
1B596
Program Z1;
uses CRT;
var a, b, c, s: integer;
begin
read(a, b, c);
s:=a+b+c;
writeln(s);
end.
