Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
1 сентября 2022 21:37
1022
Требовалось написать программу вычисления факториала числа 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
Остались вопросы?
Еще вопросы по категории Информатика
Нет индексного свойства по умолчанию для типа integer исправьте пожалуйста program max; var ar:array[1..10]of integer; a,c,i,n:integer; begin for...
запишите наименьшее четырехзначное число в пятеричной системе счисления. Помогите пожалуйста,буду очень благодарна...
Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i = ... while i <= 15: print ( "Привет!" ) i = i + 1...
Какое из перечисленных устройств не предназначено для долговременного хранения информации? съёмный жесткий диск флеш-память оптические диски операт...
Тема. Форматирование текстовых объектов документа Microsoft Word. Работа с объектами в среде текстового редактора. Вопросы 1. Дайте определение пон...
Все предметы 
