Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на языке Pascal


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Pascal

Выпуск № 189
от 06.07.2006, 08:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 196, Экспертов: 45
В номере:Вопросов: 1, Ответов: 2


Вопрос № 47824: Обьясните мне пожалуйста что средне геометрическое двух действительных, положительных чисел и как написать алгоритм по его нахождению. Заранее благодарен....

Вопрос № 47.824
Обьясните мне пожалуйста что средне геометрическое двух действительных, положительных чисел и как написать алгоритм по его нахождению. Заранее благодарен.
Отправлен: 01.07.2006, 08:28
Вопрос задал: Rebhist (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Евгения
Здравствуйте, Rebhist!
среднее геометрическое двух чисел - это корень квадратный из произведения модулей двух чисел.
sg:=sqrt(a*b);
если бы числа не были положительными, то модуль находится abs(x)

Счастливо!
---------
Я не волшебник, я только учусь... А разве кто-то обещал, что будет легко?
Ответ отправила: Евгения (статус: 7-ой класс)
Ответ отправлен: 01.07.2006, 08:42
Оценка за ответ: 5

Отвечает: Мартемьянов Алексей Борисович
Здравствуйте, Rebhist!

Program FingSrG;
var a, b : double;
BEGIN
write('введите число a : ');
readln( a );
write('введите число b : ');
readln( b );
writeln( 'среднее геометрическое чисел a и и : ', sqrt( a * b ) : 10 : 6 );
writeln(' для выхода нажмите enter ');
readln;
END.
Ответ отправил: Мартемьянов Алексей Борисович (статус: 1-ый класс)
Ответ отправлен: 01.07.2006, 17:13


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2006, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Версия системы: 4.34 от 01.06.2006
Яндекс Rambler's Top100

В избранное