Вопрос по информатике:
Составте программу вычисления произведения чисел в диапозоне от 1до 10 1*2*3*4*....*10
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 22.05.2017 02:25
- Информатика
- remove_red_eye 4668
- thumb_up 49
Ответы и объяснения 1
Program fac;
var n:integer;
function fact(n:integer):integer;
begin
if n=1 then fact:=1
else fact:=fact(n-1)*n;
end;
begin write('vvedi chislo: '); // число 10 ))
readln(n);
n:=fact(n);
writeln('otvet:', n);
read;
end.
- 23.05.2017 05:06
- thumb_up 11
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.