1 / 1 / 0
Регистрация: 16.09.2019
Сообщений: 86
1

Рубрика найти и исправить ошибку в дельфе,программа работает но не делает то что надо

29.09.2019, 14:23. Показов 332. Ответов 4
Метки нет (Все метки)

Номер задание 11.Программа работает по выводит S=0.00
Посмотрите что в коде не так,даже препод шота не смог понять в чём прокол.
Delphi
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
program Project1;
 
{$APPTYPE CONSOLE}
 
{$R *.res}
 
uses
  System.SysUtils,
  Math;
 
var S1,S2,S,x:real;
k,n, m:integer;
begin
write('n:=');readln(n);
S1:=0;
s2:=1;
for k:=1 to n do
if (k-5)*(power(x ,k)) <> 0 then
s1:=S1+(power(-1,3*k+1))/((k-5)*power(x ,k));
begin
for m:=1 to (k+7) do
if m-2 <> 0 then  s2:=S2*(sqr(m)-9)/(m-2);writeln(S2);
S:=s1*s2;
write('S:=',S:4:2);
readln;
end;
end.
Миниатюры
Рубрика найти и исправить ошибку в дельфе,программа работает но не делает то что надо  
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.09.2019, 14:23
Ответы с готовыми решениями:

Условие символьной строки, неправильно работает программа. Надо найти ошибку.
#include &lt;stdio.h&gt; #include &lt;conio.h&gt; #include &lt;string.h&gt; int main(void) { char *hC; ...

Надо найти ошибку в коде с++. После ввода элементов массива. Он стопица и ниче не делает
#include &lt;iostream&gt; using namespace std; int main() { setlocale(LC_ALL, &quot;Russian&quot;); cout &lt;&lt;...

Как работает и что делает данная программа?
#include&lt;stdio.h&gt; #include&lt;conio.h&gt; #include&lt;string.h&gt; #define size 20 char basic_w; FILE...

Динамические структуры данных, списковые структуры (надо разобраться что делает программа)
дана программа, надо помочь выяснить что в ней делает каждая подпрограмма unit Unit6; ...

4
Почетный модератор
64253 / 47553 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
29.09.2019, 14:55 2
Вообще решать это нет смысла ибо при n>1 решения нет, либо m-2=0, либо k-5=0.
0
Модератор
8093 / 5360 / 2209
Регистрация: 21.01.2014
Сообщений: 23,034
Записей в блоге: 3
29.09.2019, 14:57 3
1. Переменная Х где у Вас получает значение до того, как начинает использоваться в формуле в строке 18?
2. Переменная K - счетчик цикла for; с каких щей она вдруг стала использоваться вне этого цикла в строке 21?
3. В строке или совсем begin не нужен или Вы или не туда его воткнули... А вот нужен или нет - думайте сами...

Не по теме:

Цитата Сообщение от Vlad1kaykaz Посмотреть сообщение
даже препод шота не смог понять в чём прокол.
Да уж, совсем беда-печаль...

0
379 / 110 / 25
Регистрация: 04.08.2018
Сообщений: 498
29.09.2019, 14:58 4
Vlad1kaykaz, в какую степень надо возвести ноль, чтобы это не равнялось нулю? У вас чему х равен в строке 18?
0
Модератор
3108 / 1751 / 635
Регистрация: 15.11.2015
Сообщений: 6,938
29.09.2019, 15:02 5
Цитата Сообщение от Vlad1kaykaz Посмотреть сообщение
s2:=S2*(sqr(m)-9)/(m-2);
При m=3 здесь получаем 0 и дальше уже идёт умножение на 0.

Добавлено через 2 минуты
Если тут должен быть вложенный цикл, то begin..end неправильно расставлены.

И в 21, 22 строках writeln(S2); выполнится уже после окончания цикла. Зачем он стоит в одной строке с вычислением и путает людей?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.09.2019, 15:02
Помогаю со студенческими работами здесь

не работает программа, не знаю как исправить ошибку
https://drive.google.com/file/d/1qw-8ybQUCLDXjjyR3Wi9SJ3bJDBjOU0u/view вот задание и функция:...

Программа работает, но вычисляет не верно, не могу исправить ошибку...
Огромное спасибо всем, кто возьмётся исправить... Программа работает, но вычисляет почему-то не...

Исправить ошибку в коде (Программа не корректно работает с ру языком)
всем привет программа работает на eng языке а вот на Русском проблемы она оставляет одну букву хотя...

Нужно исправить ошибку что то не так работает
Нужно исправить ошибку что то не так работает #include&lt;iostream&gt; #include&lt;stdio.h&gt; ...

Не работает код, надо найти ошибку!
from tkinter import * root = Tk() root.title('Построение графика') root.geometry('1020x620')...

Простенькая программа с символьной строкой. Надо найти ошибку.
Программа, которая ищет в введённой строке вукву A и заменяет её на букву B и выводит полученную...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru