Составьте программу вычисления количества размещений по формуле:

@orif · Регистрация: 08.03.2011

Студворк — интернет-сервис помощи студентам

@orif · 08.03.2011, 19:03 **[ТС]**

а) составить подпрограммы
б) в основной программе ввести исходные данные;
в) выполнить обращение к функции;
г) вывод на экран полученного результата.

@SuPeR XaKer · 08.03.2011, 21:02

Pascal

Uses
 CRT;
Var
 n,m,l:integer;
 
function fact(n:integer):real;
begin
if n=0 then
 fact:=1
else
 fact:=fact(n-1)*n;
end;
 
begin
repeat
 write('Ââåäèòå n è m (n<=m): ');
 readln(n,m);
until (n>=m) and (n>0) and (m>0);
write(fact(n)/fact(n-m));
end.

@orif · 09.03.2011, 19:10 **[ТС]**

Спасибо!

@orif 22 / 22 / 9 Регистрация: 08.03.2011 Сообщений: 155
		1
	Составьте программу вычисления количества размещений по формуле: 08.03.2011, 19:02. Показов 1038. Ответов 3 Метки нет (Все метки) Составьте программу вычисления количества размещений по формуле: Миниатюры 0

@orif 22 / 22 / 9 Регистрация: 08.03.2011 Сообщений: 155
	08.03.2011, 19:03 [ТС]	2
	а) составить подпрограммы б) в основной программе ввести исходные данные; в) выполнить обращение к функции; г) вывод на экран полученного результата. 0

@orif 22 / 22 / 9 Регистрация: 08.03.2011 Сообщений: 155
	09.03.2011, 19:10 [ТС]	4
	Спасибо! 0

Опции темы