var a,b:integer;
begin
writeln ('Введите два числа:');
read (a,b);
if a > b then begin
writeln ('Максимальное число: ',a);
end
else begin
writeln ('Максимальное число: ',b);
end;
end.
Кодирование информации
Слова начинают расшифровываться со 2 буквы каждого слова через букву
Наверное контекстное меню!
В десятичной это: 172 - 4 = 168
В двоичной 168 это 10101000