Как работает оператор for? |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Как работает оператор for? |
Женя |
28.06.2003 13:22
Сообщение
#1
|
Гость |
Помогите! Завтра экзамен!
Если в задаче установлен шаг, например 3, то как его записать? Задача: Написать программу для вычисления значений Y=sqrt(Z) при изменении z от 3 до 21 с шагом 3. |
Yu Lo |
28.06.2003 15:48
Сообщение
#2
|
Гость |
[если правильно понял]
Попробуй так: Итераций: 21 / 3 = 7 То есть: procedure TForm1.Button1Click(Sender: TObject); Подправь, если что не совпадает... Сообщение отредактировано: volvo - 5.04.2010 17:09 |
Forsag |
28.06.2003 18:08
Сообщение
#3
|
Новичок Группа: Пользователи Сообщений: 25 Репутация: 0 |
или так (так быстрее)
procedure TForm1.Button1Click(Sender: TObject); |
mj |
30.06.2003 14:08
Сообщение
#4
|
Adminь Группа: Администраторы Сообщений: 803 Пол: Мужской Реальное имя: Евгений Репутация: 5 |
Цитата или так (так быстрее) Код procedure TForm1.Button1Click(Sender: TObject); var i: integer; y : real; begin for i:=1 to 7 do begin y:=SQRT(3*i); ... ... ... ... ... // Вывод результатов... end; end; А вот и не прав ;D Так медленнее... Объясняю: в первом случае в цикле будет к значению в регистре прибавлятся 3 и вычислятся корень, во втором случае к регистер будет умножатся на регистр, а как известно сложение выполняется намного быстрее чем умножение ;) |
Женя |
1.07.2003 14:26
Сообщение
#5
|
Гость |
Спасибо огромное. Вы мне очень помогли!
|
CJ |
29.07.2003 9:49
Сообщение
#6
|
Пионер Группа: Пользователи Сообщений: 84 Пол: Мужской Репутация: 2 |
Так же как и на Паскале!!!!!!
-------------------- * Origin: "It's MY LIFE!!! © Jhon Bon Jovi"
|
Текстовая версия | 28.04.2024 19:14 |