Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
Написать алгоритм вычисления |
25.01.2010, 19:34
|
|
Постоянный
Регистрация: 03.08.2006
Сообщений: 398
Провел на форуме:
6061692
Репутация:
1653
|
|
Написать алгоритм вычисления
Народ, помогите пожалуйста написать алгоритм вычесления N!
вводится N
N!=1*2*3....*N
Вот...
Спасибо
|
|
|
25.01.2010, 19:35
|
|
Постоянный
Регистрация: 16.04.2008
Сообщений: 889
Провел на форуме:
12942062
Репутация:
1550
|
|
Язык?
|
|
|
|
25.01.2010, 19:37
|
|
Постоянный
Регистрация: 16.04.2008
Сообщений: 889
Провел на форуме:
12942062
Репутация:
1550
|
|
PHP код:
<?
function factorial($n)
{
$fact=1;
for ($i=1; $i<=$n; $i++)
$fact=$fact*$i;
return $fact;
}
echo factorial(100);
?>
|
|
|
|
25.01.2010, 19:38
|
|
Leaders of Antichat - Level 4
Регистрация: 02.06.2005
Сообщений: 1,411
Провел на форуме:
10605912
Репутация:
4693
|
|
res = 1;
for(int i=1; i<=N; ++i)
res *= i;
__________________
Я отдал бы немало за пару крыльев,
Я отдал бы немало за третий глаз
За руку на которой четырнадцать пальцев
Мне нужен для дыхания другой газ..
Мой блог: http://qwazar.ru/.
|
|
|
|
25.01.2010, 19:45
|
|
Постоянный
Регистрация: 03.08.2006
Сообщений: 398
Провел на форуме:
6061692
Репутация:
1653
|
|
Черт) Надо было в виде схемыыы...
что-то вроде такой вот схемы
Последний раз редактировалось Omen666; 25.01.2010 в 19:49..
|
|
|
|
25.01.2010, 19:52
|
|
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
Провел на форуме:
3055344
Репутация:
259
|
|
publick function asdf()
k=val(textbox1)
n=1
for i=1 to k
n=n*i
next i
msgbox(n)
end function
еси надо могу блок схему нарисовать
|
|
|
|
25.01.2010, 19:56
|
|
Постоянный
Регистрация: 03.08.2006
Сообщений: 398
Провел на форуме:
6061692
Репутация:
1653
|
|
Сообщение от EndLeSSDre@M
publick function asdf()
k=val(textbox1)
n=1
for i=1 to k
n=n*i
next i
msgbox(n)
end function
еси надо могу блок схему нарисовать
во! походу то, что мне надо и есть блок схема) если я прав, напиши пожалуйста 
|
|
|
|
25.01.2010, 20:20
|
|
Постоянный
Регистрация: 03.08.2006
Сообщений: 398
Провел на форуме:
6061692
Репутация:
1653
|
|
Очень добрый парень помог мне! спасибо ему! Тему можно деллл
|
|
|
|
02.02.2010, 11:46
|
|
Постоянный
Регистрация: 03.08.2006
Сообщений: 398
Провел на форуме:
6061692
Репутация:
1653
|
|
Требуется опять написать алгоритм в виде схемы. А написать надо для "х" в степени "y". Спасибо. Надеюсь на вас.
|
|
|
|
02.02.2010, 12:03
|
|
Познавший АНТИЧАТ
Регистрация: 22.11.2007
Сообщений: 1,822
Провел на форуме:
4468361
Репутация:
1549
|
|
Код:
for i,x,y,s: integer;
begin
writeln ("enter plz x & y");
readln (x,y);
s:=1
for i=0 to y do
s:=s*x;
writeln ("x^y = ", s);
readln();
end.
-
но этот код кривой - у мну нету под ругой конпелятора. Вот питоний:
Код:
i=0
x=2
y=10
s=1
for i in range(0, y):
s=s*x
else:
print(s)
на счет предыдущего - для факториала надо всегда делать проверку, что N>0, N=0 и else. при N=0, N!=1.
---
я бы и блок-схему набросал, но у мну нету софтины с собой и нету фотоаппарата цифрового. Так что если скниешь торрент-файл на мелкомягкий визио 2007 - покажу схему.
Последний раз редактировалось Cthulchu; 02.02.2010 в 12:16..
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
