Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 895 б
- Dwayne_Johnson 865 б
1 сентября 2022 21:37
902
Требовалось написать программу вычисления факториала числа n (факториал числа n есть произведение всех целых чисел от 1 до n). Программист торопился и написал программу неправильно. Ниже приведён фрагмент его программы, в котором содержится пять ошибок:к := 1;
f := 0;
while k f:=f * k;
к:=к + 1
Найдите ошибки. Допишите необходимые операторы и выполните программу на компьютере.
Пример входных данных
Пример входных данных Пример выходных данных
Введите n> 5 5!=120
Введите n> 6 6!=720
1
ответ
Var n,k,f:integer;
begin
write('n='); readln(n);
k:=1;
f:=1;
while k<=n do
begin f:=f*k; k:=k+1; end;
writeln(n,'!=',f);
end.
begin
write('n='); readln(n);
k:=1;
f:=1;
while k<=n do
begin f:=f*k; k:=k+1; end;
writeln(n,'!=',f);
end.
0
·
Хороший ответ
1 сентября 2022 21:37
Остались вопросы?
Еще вопросы по категории Информатика
Помогите, пожалуйста, очень нужно! Срочно!:( 1) Не используя функцию возведения в квадрат, напишите на языке Паскаль наиболее короткие алгоритмы вычис...
У исполнителя Счетчик две команды, которым присвоены номера: вычти три умножь на два Первая команда уменьшает число на экране на 3, вторая - удва...
Дана программа. Введи данную программу в Паскаль. program perimetr_1; var a,b,p:real; begin a: = 9; b: = 9; p:=2*(a+b); writeln('p=',p:5:0) en...
14) Как называется минимальный блок, который может быть выделен для размещения файла на диске? 15) Отметьте преимущества файловых систем с журналирова...
A = [0, 1, 2, 3, 4] i = 1 A[2] = A[i] + A[i+1] + A[3*i] print( A[2] + A[4] ) Укажите результат работы программы....