Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
2 единицы т.к 1025=10000000001 в двоичной системе счисления
program w7w7;
var a: real;
begin
readln (a);
if a< 0 then writeln ('otritsatelnoe chislo');
if a> 0 then writeln ('pologitelnoe chislo');
end.
Популярные вопросы