Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
64000 бит/с*16 c=1024000 бита/8=128000 байт=125 килобайт
varn: integer; beginreadln(n); n: = n div 10; n: =(n div 100)*10 +n mod 10; writeln(n); n: = (n mod 10)*100+ ((n mod 100) div 10)*10+ n div 100; writeln(n); end.
решаем относительно a: a=(-6*x2-c)/x4=-6*x2/x4-c/x4.
var s,i,n,m : longint;
begin
readln(m,n);
if m> n then
s: =m;
m: =n;
n: =s
end;
s: =0;
for i: = m to n do if i mod 12=0 then s: =s+i;
writeln(s);
end.
Популярные вопросы