написать программу нахождения факториала:
10-11 класс
|
1) n!
2)1!+2!+3!+...+n!
3)1!+3!+5!+...+(2n-1)!
program zadanie1;
var n:integer;
rn:int64;
{------------------------}
function f(arg:integer):int64;
var fi:integer;
begin
f:=1;
for fi:=1 to arg do begin
f:=f*fi
end
end;
{------------------------}
begin
readln(n);
rn:=f(n);
writeln(rn);
readln
end.
Другие вопросы из категории
может быть записана 10*118 символами в час. Вычислить информационный объем
произнесенных человеком слов за 1 год.
предыдущих.То есть числами Фибоначчи являются 1,1,2,3,5,8,13,... .Определить N-е по порядку числа Фибоначчи.Помогите решить в Pascal пожалуйста)
(X v Z) & ( X v not Z) & ( not Y v Z)=
Читайте также
2) Заданы действительные числа a , b , c и d . Написать программу нахождения полусуммы наименьшего и наибольшего из них.
3) Написать программу для вычисления суммы цифр числа , введенного с клавиатуры
Помогите прошу
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
2.написать программу в паскале
f(x)=2(sin*sin)x+1
среднее второго и предпоследнего элементов массива
дан целочисленный
массив из 10 элементов написать программу находящую сумму элементов
массива красных 3 ил 5
дан целочисленный массив из 30 ти элементов
написать программу которая позволяет найти среднее арифметическое
положительных элементов массива
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу