Требуется написать программу на языке паскаль или бейсик, которая будет выводить на экран максимальное значение из трех вводимых с клавиатуры чисел.

program max_chislo;

var

  a,b,c: integer;

begin

  write ('введите три числа через пробел'); read(a,b,c); readln;

  if (a> b) and (a> c) then write('максимальное число = ',a);    

  if (b> a) and (b> c) then write('максимальное число = ',b)

      else write ('максимальное число = ',c);

  readln;

end.

uses crt; var a,b,c: integer; beginclrscr; readln(a,b,c); if (a> b) and (a> c) then writeln('max chislo = ',a); if (b> a) and (b> c) then writeln('max chislo = ',b); if (c> b) and (c> a) then writeln('max chislo = ',c); readln; end.

1100×11-100=100000     .1100                                _100100           11                                                    100 ⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻                                  ⁻⁻⁻⁻⁻⁻⁻⁻⁻       1100                                        100000 +1100 ⁻⁻⁻⁻⁻⁻⁻⁻⁻⁻ 100100

Апереведём в двоичную авс,1а_16=1010 1011 1100, 0001 1010_2 каждая цифра шестнадцати ручного представления становится четвёркой цифр в двоичном виде. теперь для перевода в восьмисотых систему будем отсекать по три бита от запятой, влево, и это будет целая часть, и потом вправо, это станет дробной частью =101 010 111 100, 000 110 100_2= справа получились только два бита, и их надо дополнить нулём =5274,064_8 б из восьмеричной переведём в двоичную 123,56_8=001 010 011, 101 110_2 переформатирование двоичное число по 4 бита в группе, при необходимости дополняя слева и справа недостающими нулями =0 0101 0011, 1011 1000_2= и заменим каждую четвёрку соответствующей шестнадцати яичной цифрой = 53,в8_16