Предмет: Информатика,
автор: romaglukhov
как программируется цикл с предусловием на паскале?
почему алгоритм вычисления N! должен быть циклическим ?
что такое математическая формализация задачи?
Ответы
Автор ответа:
0
1. while <условие> do
begin
<действие>
<действие>
.......
end;
2. Не обязательно, например, можно это сделать рекурсивно:
![1. var n:integer; \
2. function fact(j:integer):integer; \
3. begin \
4. if (j=1) or (j=0) then fact:=1 \
5. else fact:=j*fact(j-1); \
6. end; \
7. begin \
8. cls; \
9. write('Vvedite n='); \
10. readln(n); \
11. writeln('n!=',fact(n)); \
12. end.](https://tex.z-dn.net/?f=1.++var++n%3Ainteger%3B+%5C+%0A2.++function++fact%28j%3Ainteger%29%3Ainteger%3B+%5C+%0A3.++++++++begin+%5C+%0A4.++++++++++++++if++%28j%3D1%29++or++%28j%3D0%29++then++fact%3A%3D1+%5C+%0A5.++++++++++++++else++fact%3A%3Dj%2Afact%28j-1%29%3B+%5C+%0A6.++++++++end%3B+%5C+%0A7.++begin+%5C+%0A8.++++cls%3B+%5C+%0A9.++++write%28%27Vvedite++n%3D%27%29%3B+%5C+%0A10.++++readln%28n%29%3B+%5C+%0A11.++++writeln%28%27n%21%3D%27%2Cfact%28n%29%29%3B+%5C+%0A12.++end. "1. var n:integer; \
2. function fact(j:integer):integer; \
3. begin \
4. if (j=1) or (j=0) then fact:=1 \
5. else fact:=j*fact(j-1); \
6. end; \
7. begin \
8. cls; \
9. write('Vvedite n='); \
10. readln(n); \
11. writeln('n!=',fact(n)); \
12. end.")
3. создание математической модели данной задачи, (гyгл в помощь).
begin
<действие>
<действие>
.......
end;
2. Не обязательно, например, можно это сделать рекурсивно:
3. создание математической модели данной задачи, (гyгл в помощь).
Интересные вопросы
Предмет: Физика,
автор: FlipperGet
Предмет: ОБЖ,
автор: iragromov74
Предмет: Информатика,
автор: KardelSharpbrain
Предмет: Геометрия,
автор: sergei55534rus555
Предмет: Математика,
автор: Красавчек