Показать сообщение отдельно
иксуй!
Аватар для иксуй!
Сообщения: 9,544
Регистрация: 23.11.2007
Старый пост, нажмите что бы добавить к себе блог 1 декабря 2010, 00:44
  #533 (ПС)
-Цитата от Loony Sky Kid Посмотреть сообщение
Короч такая вот хуйня
Напишите фрагмент программы для вычисления:
COS(X) = 1 – X2 / 2! + X4 / 4! – X6 / 6! …
Переменная X типа Double .
Необходимо решить задачу с помощью цикла For и организовать 7 итераций.
Вот до чего дошел:
Показать скрытый текст
Dim x, cosx As Double, i, j As Integer, f As Long
Console.WriteLine("Введите x")
x = Console.ReadLine
f = 1
j = 2
For i = 2 To 14 Step 2
f = f * i * (i - 1)
cosx = 1 - (x ^ i) / f
Next
Console.WriteLine(cosx)
Console.WriteLine(Math.Cos(x))
Console.ReadKey()

Написано в VB.
Не могу один момент дописать, вот где:
-
cosx = 1 - (x ^ i) / f
считается тут надо как то сделать чередование знаков, как в задании...не пойму ничо(
Ппц задание легкое, но я очень устал, а надо очень при очень срочно..помогите плиз
х2, х4 и т.д. это х^2,X^4

Добавлено через 52 минуты 34 секунды
Пацаны выручайте, на любом языке напишите эту прогу плизззз...хотя бы момент чередования я не могу въехать!!!Очень очень надо, как можно скорее
а ты не можешь просто вставить туда условный оператор, который будет делать это чередование?
я просто тоже уже сплю, но вроде должно сработать.

Добавлено через 2 минуты 9 секунд
или просто два цикла с шагом 4, один от 2х, а другой от 4х

offline
Ответить с цитированием