1)trunc(6.9) = 6
2)trunc(6.2) = 6
3)20 div 6 = 3
4) 2 div5 = 0
5) round(6.9) = 7
6) round(6.2) = 6
7)20 mod 6 = 2
8) 2 mod 5 = 2
9) 3*7 div 2 mod 7/3 - trunc (sin(1)) = 1
Var
x, a, t, y: real;
begin
Write('Введите значение аргумента x: ');
Readln(x);
Write('Введите значение коэффициента a: ');
Readln(a);
{боремся с неположительным значением под знаком корня}
t := a - cos(x);
if t < 0 then y := exp(x + 1.8) - exp(1 / 5 * ln(-t))
else if t = 0 then y := exp(x + 1.8)
else y := exp(x + 1.8) + exp(1 / 5 * ln(t));
Writeln('Значение функции равно ', y)
end.
Тестовое решение:
Введите значение аргумента x: -4.2
Введите значение коэффициента a: 1.95
Значение функции равно 1.28604638457326
82 числа в этом промежутке
С помощью степи двух, и получаеться что наименьшее кол-во лампочем равно 7.
Последовательно, то есть друг за другом