составить программу вычисления n! (паскаль)
10-11 класс
|
uses crt;
var a,i,pr:longint;
begin
readln(a);
pr:=1;
for i:=2 to a do
pr:=pr*i;
writeln(pr);
end.
Другие вопросы из категории
а)1001110²(двойка снизу)
б)57(8) маленькая
в)12С(16) маленькие
перевести из 10 сс
а) в 8сс-428(10)
б) в2 сс-244(10)
каналу в приемник B со средней скоростью 8кбайт\с .За какое время( в секундах) данные объемом 2∧7 кбайт из А полностью поступит в В.
Читайте также
результата введите ограничение на количество знаков после запятой. Примечание. В Паскале используются стандартные функции: SIN(X) - синус Х (аргумент задается в радианах); COS(X) - косинус Х (аргумент задается в радианах); Для подсчета угла в радианах используйте формулу: угол в радианах = (угол в градусах)*/180. Результат представьте в виде: Программа вычисления значений тригонометрических функций x° Sin(x) Cos(x) Tg(x) 1 2 3 .. 45
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N
------------------------ОПЕРАТОР WHILE
задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали
2. Составьте программу, определяющую, является ли данное число делителем числа 3.
3*. Составьте программу, заменяющую из двух данных чисел меньшее число суммой, а большее – произведением этих чисел.