балов даю ⬇️⬇️⬇️⬇️⬇️⬇️⬇️⬇️⬇️
на вході маємо 2 числа программа порівнює їх між собою і виводить результат у вигляді True або false. Порівняння відбувалися за такими пунктами :
1. Чи ці числа рівні
2. Чи числа не рівні
3. Чи число більше за друге
4. Чи 2 число більше за перше
5. Чи квадрат першого числа більший за квадрат другого числа
6. Чи сума цих чисел більша за їх добуток ​

375 киболайт = 375 * 1024 * 8 = 3072000 бит

3072000 : 128000 = 24 с

ответ. понадобится 24 с.

program xxx;

    var z,d,k : integer;

begin

  z: =2; d: =7; k: =0;

  while (d> =z) do

    begin

      d: =d-z;

        k: =k+1

      end;

  writeln(d,'    ',k);

  readln

end.

program p;

var s,a,b,c: string; begins: =' фигуры'; writeln('введите названия трёх фигур'); read(a,b,c); writeln(s,': ',a,', ',b,' и ',c); end. 

в системе ascii 1 символ кодируется 1 байтом, в юникоде 2 (ну так, к слову)

текст наш состоит из 30 символов (пробелы и знаки припинания тоже считаем), значит он занимает 30 байт = 240 бит