Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 01.10.2020
Сообщений: 133
1

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

01.10.2020, 22:41. Показов 477. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите переделать это в код Паскаль, N=20, то есть х>2, х=2 и ТД. "Якщо" на русском будет "если"
Миниатюры
Рассчитать значение выражения по заданной формуле.  
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
01.10.2020, 22:41
Ответы с готовыми решениями:

Вычислить значение выражения по заданной формуле
F(x)={█(x^2-3x+9@1/(x^3+6))} если x ≤3 и если �� >3

Вычислить значение выражения по заданной формуле
подпрограммы.функция Даны действительные числа s,t. Получить:g(1.2,s)+g(s,t)-g(2s-1.5t),|(g(ln(st+1) )-g(t,s)|,где...

Вычислить значение выражения по заданной формуле
y=1+x+x^2!+..+x^N+N! ___________________________ В чём ошибка и как добавить код, изменить? Uses crt; Var y,i,x,N,M,k,f :...

2
2374 / 776 / 561
Регистрация: 15.01.2019
Сообщений: 2,394
02.10.2020, 02:02 2
....

Добавлено через 7 минут
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
32
33
34
35
36
37
38
program Project1;
const
  z = 0.7; { Значение константы z}
  t = 2.4; { Значение константы t}
var
  x: real; { Переменная для хранения значения аргумента X}
  n: real; { Переменная для хранения значения аргумента N}
  y: real; { Переменная для хранения значения результата вычисления}
  d1,d2: real; { Промежуточные переменные для вычислений}
begin
  write('Введите значение аргумента Х: ');
  readln(x);
  write('Введите значение аргумента N: ');
  readln(n);
  d1:= n/10;
  d2:= z*z;
  if x < d1 then
    begin
      if (abs(cos(d2)) < 1E-10) or (t < 0) then
        writeln('Функция не определена.')
      else
        y:= sin(d2)/cos(d2) - sqrt(t*t*t);
 
    end
  else
    if x = d1 then
      begin
        if z = 0 then
          writeln('Функция не определена.')
        else
          y:= exp(-x/z + 2) - 8.3;
      end
    else
      if x > d1 then
        y:= sin(x + 0.5*d2);
  writeln('y(x)= ',y:0:4);
  readln;
end.
0
0 / 0 / 0
Регистрация: 01.10.2020
Сообщений: 133
02.10.2020, 06:54  [ТС] 3
Спасибо)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
02.10.2020, 06:54
Помогаю со студенческими работами здесь

Вычислить значение выражения по заданной формуле
Написать программу: Даны целое число n, действительные числа i,j,k вычислить: d=tg^2((i-k)^n)+\sqrt{(i+k)/J^2+k^2}

Вычислить значение выражения по заданной формуле
Написать программу: Даны целое число n, действительные числа i,j,k вычислить: r=\cos ^3\left(i^2+3...

Вычислить значение выражения по заданной формуле
Помогите пожалуйста решить уравнение y=\begin{cases}\frac{\sqrt{1+x^2}}{\sin x} &amp; \text{, if } x^2+1\,\geq \,2 \\\\ 0.35\ln...

Вычислить значение выражения по заданной формуле
Написать программу: Даны целое число n, действительные числа i,j,k вычислить: t=\frac{\left|i+k^2...

Вычислить значение выражения по заданной формуле


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Новые блоги и статьи
Осваиваем Kubernetes: Подробная шпаргалка
Mr. Docker 15.03.2025
Kubernetes — это открытая платформа для автоматизации развертывания, масштабирования и управления контейнеризированными приложениями. Он был создан для решения проблем, с которыми сталкиваются. . .
Лучшие PHP REST API фреймворки
Jason-Webb 15.03.2025
Современные PHP REST API фреймворки предлагают большой набор функциональности: от автоматической валидации данных и управления маршрутизацией до генерации документации и интеграции с различными. . .
Многопоточность в Java с Project Loom: виртуальные или обычные потоки
Javaican 15.03.2025
Многопоточность всегда была одноим из основных элементов в разработке современного программного обеспечения. Она позволяет приложениям обрабатывать несколько задач одновременно, что критично для. . .
Что нового в Swift 6 и особенности миграции
mobDevWorks 15.03.2025
Swift 6 — это новый крупный релиз языка программирования от Apple, анонсированный на WWDC 2024. Если вы следили за эволюцией Swift, то наверняка заметили, что многие значимые возможности, которые. . .
Вопросы на собеседовании по Android
mobDevWorks 14.03.2025
По данным статистики, Android занимает более 70% мирового рынка мобильных операционных систем, что делает платформу привлекательной как для начинающих разработчиков, так и для опытных профессионалов. . . .
Лучшие игровые движки для Python
py-thonny 14.03.2025
Python обеспечивает разработчиков игр мощными движками и фреймворками, которые позволяют воплотить практически любую идею — от простой аркады до визуального романа с разветвленным сюжетом. Главное. . .
Бессерверный JavaScript: Разработка масштабируемых API с AWS Lambda
run.dev 14.03.2025
Но что такое бессерверные вычисления на самом деле? По сути, это модель облачных вычислений, где разработчик фокусируется исключительно на создании бизнес-логики, не тратя время на настройку. . .
Безопасность кода в C++26: Менеджеры ресурсов и висячие ссылки
NullReferenced 14.03.2025
C++ всегда был языком, предоставляющим разработчикам большие возможности и гибкость, но вместе с тем требующим ответственности. Одной из самых коварных проблем даже для опытных программистов остаются. . .
smart-agent proper interface settings (2025)
jigi33 14.03.2025
Smart-agent proper interface settings (mart 2025). (see screenshots to look at "Etalon" ARM)
Продвинутые настройки JVM
Javaican 14.03.2025
Стандартные параметры запуска JVM хороши для повседневной разработки, но совершенно недостаточны для высоконагруженных систем. Представьте, что вы запускаете финансовую платформу, обрабатывающую. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru
Выделить код Копировать код Сохранить код Нормальный размер Увеличенный размер