Среди ниже трёх чисел, записанных в различных системах счисления, найдите максимальное и запишите его в ответе в десятичной системе счисления. в ответе запишите только число, основание системы счисления указывать не нужно. 23(16), 32(8), 0(2)

Функция isSevenHere возвращает истину, если в числе есть семерка, и ложь - если ее нет. В цикле for перебираем все значения от 1 до K (число, введенное с клавиатуры), и выводим на экран только те, где есть семерка.

Код программы:

function isSevenHere(number : integer) : boolean;var digit : integer;begin  Result := true;  while (number > 0) do  begin        digit := number mod 10;    if (digit = 7) then            exit;    number := number div 10;  end;  Result := false;end;
var i,k :integer;begin  write('Введите k: ');  readln(k);
  for i := 1 to k do    if (isSevenHere(i) = true) then      write(i,' ');end.

В Microsoft Office Word 2007 отформатировать таблицу после ее создания можно несколькими Применение стилей таблиц позволяет задать формат сразу для всей таблицы, а также выполнить предварительный просмотр, чтобы заранее увидеть, как будет выглядеть таблица с выбранным стилем форматирования.

Таблицы можно изменять путем разбиения или объединения ячеек, добавления и удаления столбцов и строк, а также рисования. При работе с большими таблицами можно задать отображение заголовка таблицы на каждой из страниц, на которых она выводится. Чтобы исключить непредусмотренные разрывы потока данных в таблице, можно указать, в каких местах должны находиться разрывы страницы.

Объяснение: