Розв'яжіть рівняння (х+512) байт = 1 Кбайт

512 байт

Объяснение:

1 Кбайт = 1024 байт

(х+512)=1024

х=1024 - 512

х=512 байт

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.

var

a,b: real;

begin

readln(a,b);

if (a> 0) or (b< -2) then

writeln('истинно')

else

writeln('ложно');

end.