Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.12.2009, 02:44   #1
Innocence
Пользователь
 
Регистрация: 14.12.2009
Сообщений: 10
По умолчанию Turbo pascal.

Очень срочно выручите пожалуйста.
Дан массив X1,....,X12. Построить ряд Y[i] по формуле
Y[i]=(X[i]*i)\(sqrt(abs(X[i])))
Innocence вне форума Ответить с цитированием
Старый 16.12.2009, 04:44   #2
IT-man
АльTRUEи$т
Форумчанин
 
Аватар для IT-man
 
Регистрация: 19.03.2009
Сообщений: 784
По умолчанию

Код:
for i:=1 to 12 do
Y[i]:=(X[i]*i)/(sqrt(abs(X[i])));
Цитата:
«Никто не войдет в Рай, имея хотя бы крупицу гордыни в своем сердце». «Аллах Красив и любит красоту. Гордыня означает отказ от истины и высокомерие»
IT-man вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Turbo Pascal glavad Помощь студентам 5 14.12.2009 00:41
а free pascal не читает задачи которые написаны на turbo pascal? demonara Паскаль, Turbo Pascal, PascalABC.NET 3 25.05.2009 16:28
Turbo Pascal Jasper92 Помощь студентам 17 25.04.2009 14:17
Turbo Pascal dinozavr Помощь студентам 5 13.04.2009 22:10