Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.27;
Скачать: CL | DM;

Вниз

У меня наверное ошибка в ДНК?   Найти похожие ветки 

 
Sergo ©   (2002-05-24 09:34) [0]

Суть такая, вот прога:
program kurs;
i:integer;
A,Y: array [0..20] of real;
begin
for i:=1 to 20 do
Y[i]:=i;
A[i]:=(sgr(Y[i])*Y[i])-sqr(Y[i])+5*Y[i]-10;
При выводе массива А выводится 20 нулей и последним некое число. Я точно знаю, что такого быть не может, а где не правильно не пойму.


 
MBo ©   (2002-05-24 09:44) [1]

наверно, неправильно в выводе массива


 
Sergo ©   (2002-05-24 09:46) [2]

Вывожу вот так:
for i:=0 to 20 do
writeln (A[i]:8:2);
end;


 
wicked ©   (2002-05-24 09:48) [3]

хехе... :) цитирую с отступами:

for i:=1 to 20 do
Y[i]:=i;
A[i]:=(sgr(Y[i])*Y[i])-sqr(Y[i])+5*Y[i]-10;

под циклом for у тебя выполняется только Y[i]:=i;, а A[i] вычисляется только один раз - в конце... :)


 
wicked ©   (2002-05-24 09:49) [4]

может надо так?

> for i:=1 to 20 do begin
> Y[i]:=i;
> A[i]:=(sgr(Y[i])*Y[i])-sqr(Y[i])+5*Y[i]-10;
> end;


PS всем - ребята, ФОРМАТИРУЙТЕ СВОЙ КОД... это не только красиво, но и полезно... :)


 
Praco ©   (2002-05-24 09:50) [5]

Дык, напиши, как ты его выводишь.
Кстати, зачем нужен массив Y?


 
Lord Warlock ©   (2002-05-24 09:52) [6]


> wicked © (24.05.02 09:49)
написал верное решение, не было begin...end
больше обсуждать нечего




 
Sergo ©   (2002-05-24 09:56) [7]

Спасибо!!!
Все говорит о том, что пить надо МЕНЬШЕ!!!


 
vopros ©   (2002-05-24 10:05) [8]

И еще в цикле где присваеваеш с единицы начинаешь..а где выводишь..с 0.


 
Sergo ©   (2002-05-24 10:11) [9]

>vopros ©
Это просто я ошибся когда писал :))
Вчера отмечали день моей специальности, вот и руки трясуться и голова ни хрена не соображает :))


 
Anatoly Podgoretsky ©   (2002-05-24 10:45) [10]

A[i]:=(sgr(Y[i])*Y[i])-sqr(Y[i])+5*Y[i]-10;
Вот здесь I имет случайное значение, зависящие от версии компилятора.
И еще смущает, что массив от 0 до 20Б а цикл от 1 до 20
И куда выводится и как выводится совсем неясно.


 
Sergo ©   (2002-05-24 10:49) [11]

>Anatoly Podgoretsky ©
for i:=1 to 20 do begin
считать недействительным я просто ошибся когда набирал этот вопрос :))
В смысле i случайное значение? Разве оно не принимает значение указанное в цикле?




 
vopros ©   (2002-05-24 10:51) [12]

>Sergo © (24.05.02 10:49)
Примет значение 20. Поетому и выводил тебе последним некое число.


 
Sergo ©   (2002-05-24 10:56) [13]

>vopros ©
Я хотел спросить у >Anatoly Podgoretsky © какого рода эта сучайность?


 
Alx2 ©   (2002-05-24 11:41) [14]

Случайность эта обуславливается особенностями компилятора и оптимизатора кода. Но в данном примере значение i практически детерминированно :)



Страницы: 1 вся ветка

Текущий архив: 2002.06.27;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.014 c
1-88900
Cooper
2002-06-14 16:55
2002.06.27
Нужен Help по TChart


1-88868
Georg
2002-06-14 12:16
2002.06.27
InstallShield Express


14-88988
vopros
2002-05-24 10:37
2002.06.27
Весна. Почему столько страшных девушек.


1-88815
taras_g
2002-06-16 19:29
2002.06.27
XP - вид&style


3-88720
CrazyMidnightDancer
2002-06-03 21:14
2002.06.27
По поводу отбора записей в SQL