Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
WED
0 / 0 / 1
Регистрация: 17.10.2012
Сообщений: 15
1

Помощь с решением функции

17.03.2013, 21:08. Просмотров 542. Ответов 1
Метки нет (Все метки)

Сделал задачку в QBasic, теперь надо в Паскале. Сама задача "Z = 2*(B(I)+2/X), где B(I) – элемент массива B(20); X – параметр, меняющийся одновременно с номером элемента массива от 0 с шагом 0,05." А вот код QBasic
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
CLS
PRINT : PRINT : PRINT
DIM b(20)
x = 0
FOR i = 1 TO 20
b(i) = INT(RND * 300)100
IF x = 0 THEN z= 13 ELSE z = 2 * (b(i) +2 / x)
PRINT "x=";
PRINT USING "#.##"; x;
PRINT USING "#####"; b(i);
PRINT "   z=";
PRINT USING "####"; z
x = x + .05
10 : NEXT i
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.03.2013, 21:08
Ответы с готовыми решениями:

Помощь с решением уравнений в MathCad
Помогите пожалуйста как записать и решить такие уравнение в MathCad`е просьба сделать в проге и...

Ребят, нужна помощь с решением задач по исполняемым файлам.
Задача 2. Написать команду, выдающую содержимое файлов, имя которых состоит из 5 символов, из...

Можно ли применить решением к данной функции
Сама функция указана на картинке Правила форума: 5.18. Запрещено размещать задания и решения в...

Найдите все функции, которые являются решением уравнения
Найдите все функции,которые являются решением уравнения \frac{du(x,y)}{dx}=0 Буду очень...

Трудности с решением реальной задачи в части использования функции Find
Задача содержит 35 уравнений и 6 неравенств. При использовании функции Find выдаётся сообщение "Эта...

1
Ragnazar
37 / 37 / 13
Регистрация: 09.03.2013
Сообщений: 114
Записей в блоге: 2
18.03.2013, 10:33 2
Писать вопрос по QBasic в раздел Pascal?!
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.03.2013, 10:33

Помощь. Функции
Доброго времени суток. Не первый раз я обращаюсь с почти одинаковым вопросом. Но мне нужна помощь.....

Помощь в исследовании функции
Здравствуйте, нужна помощь.Исследуйте поведение данной функции в окрестности указанной точки с...

Помощь с табулированием функции в javascript
Пожалуйста, помогите с кодом - не работает, не могу найти ошибку! Я почти уверен, что дело в цикле...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru