label ra,rb;
var a,b,c: integer;
begin
write('Введите сторону a: ');
readln(a);
ra: write('Введите сторону b: ');
readln(b);
if b>a then
begin
rb: write('Введите сторону c: ');
readln(c);
if c>b then begin
if sqr(c)=sqr(a)+sqr(b) then writeln('Этот треугольник - прямоугольный') else writeln('Этот треугольник - не прямоугольный');
end else begin writeln('Введите число больше, чем ',b); goto rb; end;
end else begin writeln('Введите число больше, чем ',a); goto ra; end;
end.
1) N = 2^i
256 = 2^i
i = 8 бит глубина кодирования одной буквы из 256-символьного алфавита
2) 30 * 70 * 5 = 10500 символов всего на 5 страницах текста
3) 10500 * 8 бит = 84000 бит нужно для кодирования всего текста
84000 / 8 = 10500 байт / 1024 = 10,25 Кбайт
Ответ: 10,25 Кбайт нужно для кодирования всего текста
Управляет процессами обработки машинного кода, проиводит логические операции, выполняет арифметические операции
Это очень логическая задача попробуй включить логику и может получится если у тебяя вообще логика есть