Верны ли следущие равенства 33(8)=21(4)

338=3*8(1)+3*8(0)=27(10)
21(4)=2*4(1)+1*4(0)=8(10)

Сохранение текстовой информации страницы
1. Выделите фрагмент текста, который хотите сохранить.
2. Щелкните правой кнопкой мыши по выделенному фрагменту и в открывшемся контекстном меню выберите строку Копировать. Выделенный текст
попадет в буфер обмена.
3. Откройте любой текстовый редактор, например Word, создайте новый файл и вставьте содержимое буфера обмена по команде Правка - Вставить.
Что дальше делать с файлом, решайте сами.

Сохранение картинки
Щелкните правой кнопкой мыши по понравившейся картинке. В открывшемся контекстном меню выберите строку Сохранить рисунок как. Далее - как всегда: указываете имя файла и выбираете папку, в которой следует сохранить файл с изображением.

Сохранение всей страницы целиком
1. Выполните команду Файл - Сохранить как файл.
2. В открывшемся окне в поле Тип файла выберите вариант, например HTML-файл с изображениями или веб-страница полностью.



 

3. Как всегда, задайте имя файла и выберите папку, в которой она будет храниться.
Теперь вы в любой момент сможете посмотреть содержимое сохраненной странички, не подключаясь к Интернету.

Сохранение фрагмента страницы
1. Выделите фрагмент страницы, включая не только текст, но и изображения.
2. Щелкните правой кнопкой мыши по выделенному фрагменту и в открывшемся контекстном меню выберите строку Копировать. Выделенный текст попадет в буфер обмена.
3. Откройте текстовый редактор, создайте новый файл и вставьте содержимое буфера обмена по команде Правка - Вставить.

Успешной Вам работы

Var a: array [1..5, 1..6] of real;
      b: array [1..5] of real;
      i, j: integer;
begin for i:=1 to 5 do
          begin read(a[i,1]);
                    b[i]:=a[i,1];
                   for j:=2 to 6 do
                    begin read(a[i,j]);   {ввод элементов массива в цикле с параметром}
                              if (b[i]>a[i,j]) then b[i]:=a[i,j];
                    end;
                    writeln;    {для перехода на новую строку}
          end;
          for i:=1 to 5 do
          write(b[i], ' ');
readln;
end.