Форум программистов  
Главная  |  Правила форума  |  Исходники Delphi  |  Основы Delphi  |  Блог программистов  |  Рассылка  |  Повторная активизация e-mail  | 

Вернуться   Форум программистов > Новички в программировании > Паскаль


Ответ
 
Опции темы
Старый 30.05.2010, 23:36   #1
lelikoff
Новичок
 
Регистрация: 30.05.2010
Сообщений: 2
Репутация: 10
По умолчанию Факториалы в паскале

Дана задача, звучит она так:
Даны натуральные числа m и n. Получить
(m!+n!)/(m+n)!
Для вычисления факториала в программе предусмотреть
функцию.

Заранее благодарен!
lelikoff вне форума   Ответить с цитированием
Старый 31.05.2010, 00:12   #2
mifomen
Help, если смогу!
Форумчанин
 
Регистрация: 14.09.2009
Адрес: ℋuжний ℋoвгород
Сообщений: 55
Репутация: 10

icq: 789079 Отправить сообщение для mifomen с помощью Yahoo
skype: mifomen
По умолчанию

Код:


uses crt;
var n,m,b:integer; s:real;
function fl(var d:integer):longint;
var c:longint; i:integer;
begin
   i:=1;c:=1;
 while i<=d do
  begin   c:=c*i;   inc(i);  end;    fl:=c;
end;
begin clrscr;
writeln('Vvedite N & M ');readln(n,m);
 b:=n+m; s:=(fl(m)+fl(n))/(fl(b)); writeln(s:13:2);readkey
end.

__________________
Я помог =Нажми, НА ВЕСЫ.
Почему форум не поддерживает spoiler & spoiler2 ?
Если я вам помог, не будьте скупым R409586472993
mifomen вне форума   Ответить с цитированием
Старый 31.05.2010, 00:28   #3
lelikoff
Новичок
 
Регистрация: 30.05.2010
Сообщений: 2
Репутация: 10
По умолчанию

Спасибо огромное! Очень выручили!
lelikoff вне форума   Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
на паскале ddeman666 Помощь студентам 0 08.05.2010 01:07
паскаль и факториалы A.S.W Помощь студентам 2 07.01.2010 20:17
15 в Паскале Batonchik Паскаль 11 08.04.2009 14:20
привет всем! помогите пожалуйста решить две задачи на паскале. я в паскале полный ноль. Пищенок Саша Паскаль 5 20.01.2009 13:46




12:48.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.

Forex с Admiral Markets — это надежно


Работа на Forex с 2000 года. Очное и дистанционное обучение. Выгодные условия.
магазин горящих туров


более 1000 горящих предложений ежедневно
Бэбиблог - соц сеть для будущих мам


RusProfile.ru


Справочник российских юридических лиц и организаций.