1. Информатика
  2. Написать программу нахождения

Написать программу нахождения произведения чисел от 1 до n.для паскаль abc

niceglotatel niceglotatel    1   03.06.2019 12:00    0

Ответы
NIKROSO NIKROSO  03.07.2020 20:17
Uses crt;
var
a,n,i:integer;
begin
readln(n);
a:=1;
for i:=1 to n do begin
a:=i*a;
writeln(i,'.',a);
end;
writeln('ответ=',a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
nikusakunova nikusakunova  17.08.2019 11:20
Пропускная некоторого канала связи равна 256 000 бит/с. сколько времени займёт передача файла объёмом 500 кбайт по этому каналу? а) 64 с б) 32 с в) 4 мин. г) 16...
MrFoxTv MrFoxTv  17.08.2019 11:20
Вычислить и вывести на экран значение функции y=y(x) для всех x из диапазона (xl, xr) с шагом k (k xr–xl). для всех значений x, в которых функция y(x) не существует...
maks2324 maks2324  27.05.2019 12:20
Поменяйте местами минимальные и максимальные элементы массива. ()...
DarinaKimovsk DarinaKimovsk  20.05.2019 14:30
Даны три положительных числа a,b,c. проверить будут ли они сторонами треугольника.если да, то вычислить площадь этого треугольника...
dimaburkovskiy3 dimaburkovskiy3  20.05.2019 14:30
Составьте алгоритм вычисления суммы всех натуральных чисел,не привышающих заданного натурального числа n . проверьте алгоритм трассировкой. напишите программу в...
DANA3072005 DANA3072005  20.05.2019 14:30
1) поменять местами минимальный четный элемент с последним. 2)на место максимального отрицательного элемента поместить сумму элементов кратных 3. (в программе паскаль)...
Picmout Picmout  20.05.2019 14:20
1. в массиве day хранятся данные о количестве израсходованных денег за телефон за неделю (day [1] — данные за понедельник, day [2] — за вторник и т. определите,...
33даник747 33даник747  20.05.2019 14:20
Для чего вводиться ключевой атрибут в реляционной базе данных?...
Limon2601 Limon2601  20.05.2019 14:20
Год является високосным, если его номер кратен 4,однако из кратных 100 високосными являются лишь кратные 400. например 1700,1800,1900-не високосные, а 2000 високосный....
oleg1836 oleg1836  20.05.2019 14:20
Найти произведение всех нечетных чисел от 150 до 300...

Популярные вопросы