|
Вопрос # 6 005/ вопрос решён / |
|
Здравствуйте!
Мне нужна ваша помощь)
Это просто запара по этому програмированию..помогите плиз,написать уравнение на языке Delphi.
К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)
 |
Вопрос задала: Kashicina (статус: Посетитель)
Вопрос отправлен: 16 марта 2012, 11:33
Состояние вопроса: решён, ответов: 1.
|
Ответ #1. Отвечает эксперт: Мережников Андрей
Здравствуйте, Kashicina!
Примерно так, как в приложении. Что за переменные x и l - из приведенной формулы непонятно
Приложение: Переключить в обычный режим- <code>
- var i,f:integer;
- p:real;
-
- begin
- f:=1;
- for i:=1 to 5
- do begin
- f:=f*i;
-
- p:=(f+sqrt(f+l))/abs(x-f);
- end;
- end;</code>
 |
Ответ отправил: Мережников Андрей (статус: Абитуриент)
Время отправки: 16 марта 2012, 19:17
Оценка за ответ: 5
|
Мини-форум вопроса
Всего сообщений: 3; последнее сообщение — 16 марта 2012, 22:09; участников в обсуждении: 2.
16 марта 2012, 11:37: Вопрос перемещён из тематического раздела Delphi » Общие вопросы по программированию в раздел Лабораторный практикум » Delphi модератором Ерёмин А.А. Причина: Вашим запарам место здесь.
|
Мережников Андрей (статус: Абитуриент), 16 марта 2012, 19:19 [#1]:
из приведенного кода надо убрать "<сode>, < /сode>"
|
|
Kashicina (статус: Посетитель), 16 марта 2012, 22:01 [#2]:
Спасибочки огромное....Вы мой Герой)
|
|
Мережников Андрей (статус: Абитуриент), 16 марта 2012, 22:09 [#3]:
извините, в приведенном коде ошибка. Перед циклом надо добавить:
p:=1;
а формулу в цикле написать так:
p:=p*(f+sqrt(f+l))/abs(x-f);
|
17 марта 2012, 15:38: Статус вопроса изменён на решённый (изменил модератор Ерёмин А.А.): Сделано. Сдано или нет — не в курсе.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|