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

Ошибка в решение!

15.02.2010, 17:01. Показов 627. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program P3;
uses ctr;
var
s,y,x:real;
i,z:integer;
begin clrscr;
write('Сколько вычеслений сделать:');
readln(z);
s:=0;
for i:=1 to z do
begin
write('Введите X:');
readln(x);
y:=cos(4*3.1416*x)/(1+x*x);
if frac(y)>0.5 then S:=s+y;
end;
writeln('s=',S:8:3);
readln;
end.
Добавлено через 1 минуту
В чём здесь не правельно? задача вот 1.F(x)=(cos4*3.14*x)/1 +x*x
Найти сумму вычисленных значений функции f(x), дробная часть которых > 0.5
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
15.02.2010, 17:01
Ответы с готовыми решениями:

Решение уравнения, ошибка 207
Добрый день! Нужно написать программу решения уравнения (задание и само уравнение вложено картинкой). Не знаю как выразить x, и в подарок...

Решение задачи Коши - ошибка
Ввожу пример из методички, а выдает ошибку Error, (in dsolve/numeric/process_input) indication of the unknown(s) of the problem {v(x)}...

Решение ошибка'' inaccesible value'' в массиве
Нужно разрешить ошибку и выложить исправленный код unit Unit1; interface uses Winapi.Windows, Winapi.Messages,...

3
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
15.02.2010, 17:45
uses ctr;это поправь
а так ошибок нет, просто формула интересная, взял числа от -5 до 5, ни одного значения дробной части больше 0,5, самое большое при -1=0,499999999
0
0 / 0 / 0
Регистрация: 10.02.2010
Сообщений: 5
15.02.2010, 18:31  [ТС]
А что именно там не так?
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
15.02.2010, 19:19
Цитата Сообщение от Meet163 Посмотреть сообщение
А что именно там не так?
Ну не попались У с дробной частью больше 0,5 и сумма все время=0
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
15.02.2010, 19:19
Помогаю со студенческими работами здесь

Где-то ошибка, решение уравнения x^3+ax^2+bx+c = 0
Написал программу для вычисления корней x_{1}, x_{2}, x_{3} уравнения x^3+ax^2+bx+c = 0 По формуле тригонометрической Виета ...

Ошибка DirectoryNotFoundException при сохранении и её решение - C#
Скрипт сохранения using System.Collections; using System.Collections.Generic; using UnityEngine; using UnityEngine.UI; using...

Решение примера, не ясно где ошибка
Здравствуйте. Помогите,решаю пример. X=6*(A-2B+C/4)+10 Вот код: org 100h MOV AX, A MOV BX, B SAL BX, 1 SUB AX,BX MOV CX, C ...

Решение СЛАУ методом Гаусса. Ошибка
Добрый день/утро/вечер! Хочу прописать решение СЛАУ методом Гаусса ( https://ru.wikipedia.org/wiki/Метод_Гаусса найдите на странице через...

Решение по правилу Лопиталя, в чем ошибка?
После преобразования не получается решить по правилу Лопиталя. В чем ошибка?


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru