var
a,b,i: integer;
begin
writeln ('введи два числа');
read (a,b);
if a>b then writeln (a,'большее число')
else
writeln (b,'большее число')
end.
10 битов, 20 битов, 2 байта, 1 кбайт, 1010 байтов.
Полюбому ты эти вопросы взял из книжки, поэтому посмотри тему и ты найдешь свой ответ
Блок-схема по ГОСТ 19.701-90 (ISO 5807-85) во вложении.
Информационный процесс - поиск информации