Форум программистов
Реклама:
Интернет Контроль Сервер: российский межсетевой экран.
Контроль трафика, контент-фильтр, почта, антивирус, VPN, прокси-, веб- и jabber-сервер. Сертификат ФСТЭК
Регистрация  |  Повторная активизация e-mail  |  Правила форума  |  Исходники Delphi  |  Основы Delphi  |  Новости клуба  |  alarforum@yandex.ru

Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам!


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

реклама онлайн
раскрутить свой сайт
купить посетителей
монетизация
сайтов и приложений
зарабатывай
на кликах

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

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

Заранее благодарен!
lelikoff вне форума   Ответить с цитированием
Старый 31.05.2010, 01: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, 01:28   #3
lelikoff
Новичок
 
Регистрация: 30.05.2010
Сообщений: 2
Репутация: 10
По умолчанию

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



Опции темы

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

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

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

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




12:15.


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

Пеллетные котлы Emtas


Emtas.net продажа и монтаж отопительного оборудования
Корпусная мебель оптом и под дизайн проект


Низкие цены, высокое качество.
RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru