![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() |
Женя |
![]()
Сообщение
#1
|
Гость ![]() |
Помогите! Завтра экзамен!
Если в задаче установлен шаг, например 3, то как его записать? Задача: Написать программу для вычисления значений Y=sqrt(Z) при изменении z от 3 до 21 с шагом 3. |
![]() ![]() |
mj |
![]()
Сообщение
#2
|
![]() Adminь ![]() ![]() ![]() ![]() Группа: Администраторы Сообщений: 803 Пол: Мужской Реальное имя: Евгений Репутация: ![]() ![]() ![]() |
Цитата или так (так быстрее) Код 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 и вычислятся корень, во втором случае к регистер будет умножатся на регистр, а как известно сложение выполняется намного быстрее чем умножение ;) |
![]() ![]() |
![]() |
Текстовая версия | 14.07.2025 16:12 |