9*. Розгадайте кросворд. Визначте та запишіть слово, яке буде отримано в зафарбованих клітинках. Що воно означає?
1
2
ст
5
По горизонталі:
1. Процес показу комп'ютерної презентації.
2. Об'єкт титульного слайда, у якому вказано назву презентації.
3. Одна з властивостей слайда презентації, що стосується його фону.
4. Захід, на якому відбувається представлення чогось нового групі осіб.
5. Пристрій, призначений для показу комп'ютерної презентації на великому екрані.
Слово в зафарбованих клітинках:
Його значення:​

Function IsEqual(n:longint):boolean;
{ возвращает True, если первая и последняя цифры числа равны }
var
  s:string;
begin
  Str(n,s);
  IsEqual:=(s[1]=s[Length(s)])
end;

var
  k:longint;
begin
  Write('Введите натуральное число '); Read(k);
  Write('Первая и последняя цифры введенного числа ');
  if not IsEqual(k) then Write('не ');
  Writeln('совпадают')
end.

Тестовые решения:
Введите натуральное число 15342403
Первая и последняя цифры введенного числа не совпадают

Введите натуральное число 745370007
Первая и последняя цифры введенного числа совпадают

Для перевода в любую счислительную систему из десятичной нужно число делить на 2, 8 и 16 соответственно системам. Остаток при делении отмечаешь (если число делится нацело то отмечаешь остаток как ноль). Затем частное от первого деления снова делишь на 2, 8 или 16 соответственно системе счисления. Отмечаешь остаток. И так далее пока не останется в частном то, что уже нельзя делить. Отмечаешь последнее частное. А потом задом наперед (справа на лево) выписываешь последнее частное и за ним все остатки. Это и будет перевод числа в данную систему счисления.
2. a)
    b)
3. a)
    b)
4. a) --> 4 единицы в записи
    b) --> 2 единицы в записи.
5. a) --> 4 нуля в записи
    b) --> 2 нуля в записи