Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
1 / 1 / 1
Регистрация: 16.12.2011
Сообщений: 52

Вычислить значение выражения

13.06.2012, 19:24. Показов 1313. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
1). Для x1 = 0,3 и x2 = –0,3 найти xk =k + sin(xk-2) для k, изменяющегося следующим образом: k = 3, 4, ..., 14.
2)Для x из интервала (2; 8) с шагом 0,75 вычислить y = (4x3 – 3x + cos(x))/А, где А вводится с клавиатуры.

Заранее благодарен за какую либо помощь
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
13.06.2012, 19:24
Ответы с готовыми решениями:

Вычислить значение выражения, значение n вводится с клавиатуры
составить программу для решения задачи. При решении задачи через цикл-"хорошо", через цикл и...

Вычислить значение выражения и записать это значение в файл
Даны целые положительные числа m и n. Получить...(скрин формулы). Результат записать в файл. (При...

Для выражения определить наименьшее k, при котором значение выражения становится больше заданного числа П
Для выражения exp(k)/k определить наименьшее k, при котором значение выражения становится больше...

2
Лучи добра
 Аватар для Das Gespenst
173 / 171 / 191
Регистрация: 08.06.2012
Сообщений: 292
13.06.2012, 19:43
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Первая:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program z;
var x,x1:real;
procedure math(xx:real);
     var k:integer; yy:real;
     begin
         for k:=3 to 14 do
             begin
                  yy:=k+sin((k*xx-2)*arctan(1)*4/180);
                  writeln(yy*k:6:2);
             end;
     end;
begin
     x:=0.3; x1:=-0.3;
     writeln('Значение x*k');
     math(x);
     writeln('Значение x1*k');
     math(x1);
end.
Добавлено через 3 минуты
Вторая:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
program z;
var x,y,a:real;
begin
     writeln('Введите A');
     readln(a);
     x:=2;
     writeln('Значение y');
     repeat
           y:=(4*exp(3*ln(x))-3*x+cos(x*arctan(1)*4/180))/a;
           x:=x+0.75;
           writeln(y:9:4);
     until x>8
end.
1
13.06.2012, 19:45
 Комментарий администратора 
DimaKAA, перечитайте правила форума.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
13.06.2012, 19:45
Помогаю со студенческими работами здесь

Найти значение выражения z=/3x-4/, при -100<x<0 и значение z=x-sqr(x), при 0<x<=100
Здравствуйте,помогите пожалуйста решить задачи в Pascal. 7)найти значение выражения z=/3x-4/,...

Проанализировать выражение, найти область допустимых значений аргумента x. Определить, как вычислить выражение
Проанализировать выражение, найти область допустимых значений аргумента x. Определить, как...

Записать логическое выражение, при котором можно вычислить заданное арифметическое выражение
Записать логическое выражение, при котором можно вычислить следующее арифметическое выражение...

Вычислить сумму или произведение значений выражения для заданного числа значений аргумента
Помогите исправить задачу. Я ее написал и не могу понять где ошибка. вычислить сумму или...

Вычислить сумму (или произведение) значений выражения для значений аргумента
вычислить сумму (или произведение) значений выражения для значений аргумента x изменяющегося от...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
1С: Программный отбор элементов справочника по группе
Maks 22.03.2026
Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .
Как я обхитрил таблицу Word
Alexander-7 21.03.2026
Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a
AmbA 21.03.2026
без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
1С: Программный отбор элементов справочника по значению перечисления
Maks 21.03.2026
Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru