Var a, b: Integer;
begin
ReadLn(a, b);
if a>b then WriteLn(a)
else WriteLn(b);
end.
-------------------------
Это если консольное. Если графическое приложение - тогда приношу свои извинения.
12455823546323985496327452396857
Информация — это сведения независимо от формы их представления.Виды информации: Вкусовая; Обонятельная; Осязательная; Визуальная; Аудиальная (звуковая); Числовая; Текстовая; Графическая; Звуковая; Видео.
При использовании 2 цветов для хранения одной точки изображения требуется log(2)2 = 1 бит.
Память для всего изображения = 800*600*1 бит = 800*600/8 байт = 60000 байт
131. т.к. N=4, то i= 2, следовательно - 2 бита
133. 65 536 = 2^16, 16:8= 2 БАЙТА
137. 16 777 216 = 2^24, i=24
I=K*i=1024*768*24= 18 874 368 бит : 8 = 2 359 296 байт : 1024 = 2304 кбайт
остальные прости не знаю)