//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var (m,n):=ReadInteger2;
write('s=',SeqGen(n-m,x->1/sin(x),m).Sum:0:2);
end.
отладка:
10 25
s=-111.92
Это ссылка,а так если надо точно то
Не, не может. Т.к после ell идёт звездочка
Ответ:
Объяснение:
program N1;
var a, b: integer;
begin
readln(a, b);
if (a div 10 + a mod 10) > (b div 10 + b mod 10) then
writeln ('Сумма цифр ', a, ' больше')
else
writeln ('Сумма цифр ', b, ' больше');
end.
Очень просто задание.
А - 11
Б - 010
В - 100
Г - 110
1100101111110100, чтобы перевести в шестнадцатеричный код нужно отделять по 4 знака.
1100 1011 1111 0100
По таблице тетрад знаем.
CBF4
Ответ: CBF4