2/512 Мбайт = 2*1024/512 Кбайт = 4 Кбайта = 4*1024 байт
Память для одного символа = 4*1024/2048 = 2 байта = 2*8 бит = 16 бит.
Мощность алфавита = 2^16 = 65536
//PascalABC.NET
begin
ReadSeqIntegerWhile(x -> x <> 0).Where(x -> (x mod 10 = 6) and (x mod 6 = 0)).Sum.Print;
end.
Так и будет колмес)Колмес это поворот колеса,которые осуществляется вручную,с помощью штифта.
Var N, k, i: integer;
begin
write(' N = ');
readln(N);
k:=0;
for i:=N downto 1 do
k:=k+i*i;
writeln ('k=', k);
end.