для какого числа х ложно высказывание :
(х> 8) или не (х> 7)

ответ:

я думаю это (x> 8) попробуй

uses crt; var

  i,s1,s2: integer; begin  for i: =1 to 100 do  begin    if i mod 2=0 then s1: =s1+i    else s2: =s2+i;   end;   writeln('сумма четных чисел: ',s1);   write('сумма нечетных чисел:   ',s2); end.

81920 бит : 8 = 10240 байт

10240 байт : 1024 = 10 килобайт