Ассемблер (Транслятор исходного текста программы)
Var s:int64;
a,b,i:longint;
beginassign(input,'d.in');
reset(input);
assign(output,'d.out');
rewrite(output);
s:=0;
read(a,b);
if odd(a) then i:=a else i:=a+1;
while i<=b dobegins:=s+i;
inc(i,2);
end;
writeln(s);
<span>end.</span>
Мен азанда жаттығу жасаймын .Мен ыдыс жуамың.Мен мектеп ке барғанды жақсы көремін. Мен анама, әкеме және әжеме көмектескенді жақсы көремін.
Дано:
N1=16
N2=32
K1=100
K2=50
Найти: I
Формулы: N=2i, I=k*I
Решение:
16i=4, 32i=5
100*5=500
50*5=250
Ответ: 500 и 250