Рассчитать значения функции согласно своему варианту. Предусмотреть сохранение в памяти вычисленных значений

@vladmisterx · Регистрация: 10.11.2015

Студворк — интернет-сервис помощи студентам

$https://www.cyberforum.ru/cgi-bin/latex.cgi?d=\ln\left|x+\sin {x}^{4} \right|$ при x {0.75; -3.1; 21; -1.7; 3}
Количество и произведение элементов, больших -2

@CodeR · 11.11.2015, 13:05

Pascal

Const n=5;
      x:array[1..n] of real=(0.75, -3.1, 21, -1.7, 3);
Var d:array[1..n] of real;
    i,k:integer;
    pr:real;
Begin
    k:=0;pr:=1;
    For i:=1 to n do
    Begin
      d[i]:=ln(abs(x[i]+sin(sqr(x[i]*x[i]))));
      writeln('При x = ',x[i]:6:2,' d = ',d[i]:6:2);
      if d[i] > -2 then 
      Begin
        k:=k+1;
        pr:=pr*d[i];
      End;
    End;
    if k = 0 then writeln('Нет элементов больших -2')
    else
    Begin
      writeln('Элементов больших -2 = ',k);
      writeln('Их произведение  = ',pr:0:2);
    End;
    readln;
End.

@vladmisterx · 11.11.2015, 14:41 **[ТС]**

Спасибо)

@vladmisterx 0 / 0 / 0 Регистрация: 10.11.2015 Сообщений: 11
		1
	Рассчитать значения функции согласно своему варианту. Предусмотреть сохранение в памяти вычисленных значений 11.11.2015, 11:19. Показов 1439. Ответов 2 Метки нет (Все метки) $https://www.cyberforum.ru/cgi-bin/latex.cgi?d=\ln\left\|x+\sin {x}^{4} \right\|$ при x {0.75; -3.1; 21; -1.7; 3} Количество и произведение элементов, больших -2 0

@vladmisterx 0 / 0 / 0 Регистрация: 10.11.2015 Сообщений: 11
	11.11.2015, 14:41 [ТС]	3
	Спасибо) 0

Опции темы

Рассчитать значения функции согласно своему варианту. Предусмотреть сохранение в памяти вычисленных значений

Решение