Эта команда создаст все каталоги:
mkdir C:\школа\проекты\информатика\2четверть\контрольная
Создавать презентацию нужно в каталоге C:\школа\проекты, потом нужно переместить ее в C:\школа\проекты\информатика\2четверть\контрольная.
Var a, x: longint;
begin
readln (a);
x:=-a;
writeln ('x1=0');
writeln ('x2=',x);
end.
N=2^16
16 бит
64*10*32=20480
20480*16=327680бит
40кб
Procedure factorize(n: longint);
var divisor: longint;
begin
divisor := 2;
while divisor * divisor <= n do
if n mod divisor = 0 then
begin
n := n div divisor;
writeln(divisor);
end
else inc(divisor);
if n <> 1 then writeln(n);
end;
var n: longint;
begin
readln(n);
factorize(n);
end.
640*272*1бит = 174080 бит / 8 = 21760 байт / 1024 = 21,25 Кб