Алгебра
Английский
Биология
География
Геометрия
История
Русский
Обществознание
Физика
Химия
Информатика
Литература
МатематикаВопрос:
2. Запишите результат выполнения программы. var p, n: integer; begin p:=1; for n:=5 downto 3 do p:=p*n; writeln (p) end.
Ответ:
| n | p |
|---|---|
| - | 1 |
| 5 | 5 |
| 4 | 20 |
| 3 | 60 |
Ответ: 60
Похожие
- 1. Запишите значение переменной sum после выполнения фрагмента программы. sum:=0; for i:=5 to 9 do sum:=sum+i;
- 2. Запишите результат выполнения программы. var p, n: integer; begin p:=1; for n:=5 downto 3 do p:=p*n; writeln (p) end.
- 3. Дополнительное задание. Напишите программу, которая по двум натуральным числам a и b, не превосходящим 30 000, подсчитывает количество натуральных чисел, кратных 10, на отрезке [a, b]. Программа получает на вход два натуральных числа а и б, при этом гарантируется, что 1<a<b< 30 000. Проверять входные данные на корректность не нужно. Программа должна вывести одно число: количество натуральных чисел, кратных 10, на отрезке [a, b]. Пример работы программы: Входные данные Выходные данные 7 37 3
