Вычислить значение функции c оператором repeat

@belarusskin · Регистрация: 27.11.2019

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

Вычислить значение функции c оператором repeat

$https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> Z=\begin{cases}1.7\cos ^2x & \text{ if } x<1 \\ 1.6ax & \text{ if } x=1 \\\\ (x-3)^2+8 & \text{ if } 1<x<2 \\ 5\operatorname{tg}x & \text{ if } x>2 \end{cases}\\\\a=2.8\\\\x\in [0.3;\,3]\\\\\Delta x=0.1<br />$

@belarusskin · 27.11.2019, 23:00 **[ТС]**

Если получиться то с выводом ответа в файл пожалуйста.

@Cyborg Drone · 28.11.2019, 00:48

При x=2 значение Z не определено. Вряд ли так было задумано, буду считать, что последнее условие следует читать как "x ≥ 2".

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
const
  a = 2.8;
  xn = 0.3;
  xk = 3;
  dx = 0.1;
  fname = 'f.txt';
 
var
  f: text;
  x, z: real;
 
begin
  assign(f, fname);
  rewrite(f);
  x := xn;
  repeat
    if x < 1
      then z := 1.7 * sqr(cos(x))
      else if x = 1
        then z := 1.6 * a * x
        else if x < 2
          then z := sqr(x - 3) + 8
          else z := 5 * sin(x) / cos(x);
    writeln(f, 'x = ', x:0:1, ',  Z = ', z:14:10);
    x := x + dx;
    if abs(round(x) - x) < dx / 2 then x := round(x)
  until x > xk;
  close(f);
  write('Файл ', fname, ' записан в папку с программой. Нажмите <Enter> для выхода из программы.');
  readln
end.

Строка 27 нужна для исключения ошибок усечения при целых значениях "x". Можно убрать эту строку, но тогда при x = 1 функция будет вычислена по формуле 1.7cos²x (как для x < 1), и последнее значение функции (при x = 3) вычислено не будет.

@belarusskin · 28.11.2019, 09:58 **[ТС]**

Благодарю.

Новые блоги и статьи Все статьи Все блоги /
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .

@belarusskin 0 / 0 / 0 Регистрация: 27.11.2019 Сообщений: 8

	Вычислить значение функции c оператором repeat 27.11.2019, 22:50. Показов 3003. Ответов 3 Метки нет (Все метки) Вычислить значение функции c оператором repeat $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> Z=\begin{cases}1.7\cos ^2x & \text{ if } x<1 \\ 1.6ax & \text{ if } x=1 \\\\ (x-3)^2+8 & \text{ if } 1<x<2 \\ 5\operatorname{tg}x & \text{ if } x>2 \end{cases}\\\\a=2.8\\\\x\in [0.3;\,3]\\\\\Delta x=0.1<br />$ 0

@belarusskin 0 / 0 / 0 Регистрация: 27.11.2019 Сообщений: 8
	27.11.2019, 23:00 [ТС]
	Если получиться то с выводом ответа в файл пожалуйста. 0

@belarusskin 0 / 0 / 0 Регистрация: 27.11.2019 Сообщений: 8
	28.11.2019, 09:58 [ТС]
	Благодарю. 0

Вычислить значение функции c оператором repeat

Решение