int n, m;
cin >> n >> m;
for (int i = n; i <= m; i++ ) {
if (i % 2 == 0) {
cout << i << " ";
}
}
Var x,f: real;
Begin
write('x = ');
readln(x);
if x<=-2
then f:=sin(x+1)
else if x<1 then f:=exp(x-1)/5
else f:=ln(abs(exp((1/3)*ln(x+2))));
writeln('f = ',f);
End.
Пример:
x = 5
f = 0.648636716351771
Информа́ция<span> (от </span>лат. informātiō<span> — «разъяснение, представление, понятие о ч.-л.», от </span>лат. informare<span> — «придавать вид, форму, обучать; мыслить, воображать») — сведения, независимо от формы их представления</span>[1]<span>, воспринимаемые человеком или специальными устройствами как отражение </span>фактов материального мира<span> в процессе </span>коммуникации<span>
</span><span><span> знания о предметах, фактах, идеях и т. д., которыми могут обмениваться люди в рамках конкретного контекста (ISO/IEC 10746-2:1996)[4]; </span><span>знания относительно фактов, событий, вещей, идей и понятий, которые в определённом контексте имеют конкретный смысл (ISO/IEC 2382:2015)<span>[5]</span></span></span>
Ответ: 163.
Решение смотри во вложении.
<em>// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (a,b):=ReadReal2('Введите два числа');
var d:=a-b;
Writeln(d>0 ? 2 : d=0 ? 0 : 1)
end.
<u>Примеры</u>
Введите два числа 5.7 9
1
Введите два числа 8.5 -6.4
2
Введите два числа 2 2.0000
0
В последнем случае 0 означает, что числа равны и нет номера большего числа.