Используя цикл с предусловием написать программу вычисления n! (эн факториал)
5-9 класс
|
var
i,n,f:integer;
begin
readln(n);
i:=1;
f:=1;
while i<=n do
begin
f:=f*i;
i:=i+1;
end;
writeln(f);
end.
Другие вопросы из категории
шагом равным 20.Screen12
2.Скорость передачи данных через ADSL-соединение равна 256000 бит/с.Передача файлов через это соединение заняла 2 минуты.Определите размер файлов в килобайтах.
3.Скорость передачи данных через ADSL-соединение равна 128 Кбит/с.Размер файла составляет 368 Кбайт.Определите время передачи файла в секундах.
Помогите пожалуйста написать дано и решение.
меньше числа в полях RGB тем темнее цвет этого поля, какой цвет будет в прямоугольнике вместо знака вопроса если для получения вариантов ответов в полях RGB использовались числа 13 100 200 255?
Читайте также
написал программу неправильно. Ниже приведён фрагмент его программы, в котором содержится пять ошибок:
k:=1;
f:=0;
while k<n do
f:=f*k;
k:=k+1
вычисления суммы чисел от 6 до 10. Написать программу вычисления n! (факториал числа n), где n- целое неотрицательное число.
Определение факториала:
0!=1, 1!=1, 2!=1*2, 3!=1*2*3, ……,n!=1*2*3*…*(n-1)*n.
Другими словами n!- это произведение n натуральных чисел.
секунд.
3)Составте программу вычисления площади треугольника с основанием а и высотой h. Значение a и h введите с клавиатуры.
положительных чисел, которые вводятся с клавиатуры. 2. Написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел (длина последовательности неограниченна).
арифметического полученных значений.
2. За весну Обломов похудел на p1 кг, за лето поправился на p2 кг, за осень похудел на p3 кг, за зиму поправился на p4 кг. Написать программу, определяющую, похудел или поправился за год Обломов.
3. Написать программу, которая определяет, является ли целое число четным двузначным числом.
4. Даны коэффициенты квадратного уравнения. Написать программу, определяющую его корни