Форум программистов  
Главная  |  Правила форума  |  Исходники Delphi  |  Основы Delphi  |  Блог программистов  |  Рассылка  |  Повторная активизация e-mail  | 

Вернуться   Форум программистов > Новички в программировании > Помощь студентам


Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Название темы включает слова - "Помогите", "Спасите", "Срочно"
Название темы не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте >>>правила <<< и заново правильно создайте тему.
 
Опции темы
Старый 17.11.2009, 20:10   #1
whatever
a.k.a. Skull
Участник клуба
 
Регистрация: 17.11.2009
Адрес: Красноярск
Сообщений: 966
Репутация: 379

skype: skull_negodue
По умолчанию Нахождение синуса

Сразу хочу извиниться за название темы, ума не дам как описать эту проблему...
Код:

const
n=11;
var
  i:integer;
  z:real;
BEGIN
  write('x':8);
  write('sin':8);
  write('cos':8);
  writeln;
  z:=0;
  for I:=1 to n do
    begin
      write(z:8:3);
      write(sin(z):8:3);
      write(cos(z):8:3);
      writeln;
      z:=z+0.1;
    end;
readln
END.

Эта программа находит значения синуса и косинуса на отрезке [0.1] с шагом в 0.1
Результат такой:
Код:

        x        sin        cos
    0.000    0.000    0.000
    0.100    0.100    0.995
..................................
    1.000    0.841    0.540

А должен быть:
Код:

        x        sin        cos
    0.000    0.000    0.000
    0.100    0.099    0.995
..................................
    1.000    0.842    0.540

Вот теперь вопрос: почему значения синуса находятся неверно? Если в теле программы sin заменить на cos, то значения косинуса выдаются верно, т.е. значения аргумента х подставляются правильные.

Ума ни дам где может быть ошибка...
whatever вне форума  
Старый 17.11.2009, 20:23   #2
whatever
a.k.a. Skull
Участник клуба
 
Регистрация: 17.11.2009
Адрес: Красноярск
Сообщений: 966
Репутация: 379

skype: skull_negodue
По умолчанию

Все, разобрался, округляет он оказывается... Оказалось, что у меня задание так сформулировано, что при х=0,1 округлять не надо, а при х=1 почемуто округлили, что и ввело в заблуждение.

Да, тему можно удалить
whatever вне форума  
Закрытая тема


Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
помогите с вычислением синуса, косинуса, тангенса и котангенса Panika Помощь студентам 10 08.11.2009 16:54
Помогите составить программу вычисления матричного синуса, пожалуйста! Lunatik Помощь студентам 6 31.03.2009 15:59
Реализация синуса angol Помощь студентам 5 07.11.2008 22:00
Генератор синуса Ulex Assembler 1 14.09.2008 11:53
Быстрый алгоритм для вычисления синуса RIO Помощь студентам 10 17.12.2007 14:33




09:12.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.

Forex с Admiral Markets — это надежно


Работа на Forex с 2000 года. Очное и дистанционное обучение. Выгодные условия.
магазин горящих туров


более 1000 горящих предложений ежедневно
Бэбиблог - соц сеть для будущих мам


RusProfile.ru


Справочник российских юридических лиц и организаций.