Дано целое число n(больше 0) найти произведение n! =1*. n(факториал).чтобы избежать целочисленного переполнения,вычислять это произведение с вещественной переменной и вынести его как вещественное число
// PascalABC.NET 3.2, сборка 1439 от 09.05.2017 // Внимание! Если программа не работает, обновите версию!
begin Writeln('S=',ReadSeqInteger(ReadInteger('n=')).Where(k->k<0).Sum) end.
Пример n= 8 34 -12 0 16 -5 -7 2 -9 S=-33
Пояснения ReadInteger('n=') выдает подсказ 'n=' и организует ввод целого числа, мы обозначим его условно n. ReadSeqInteger(n) обеспечивает получение с клавиатуры последовательности n целых чисел. Эта последовательность проходит через фильтр .While(k->k<0), который пропускает только отрицательные числа. Все, что через фильтр, будет просуммировано при И осталось только вывести результат при тут_сумма) Вот и все.
Информатика - наука, изучающая информационные аспекты системных процессов и системные аспекты информационных процессов. Это определение можно считать системным определением информатики.
Информатика - это наука об инвариантах (т.е. неизменных сущностях) информационных процессов, о их выявлении, описании, изучении, применении, пространственно-временной организации и самоорганизации. Такое определение естественно назвать синергетическим определением информатики и оно имеет важное значение при исследовании синергетики информационных процессов в различных системах.
Информатика тесно связана и с философией. Философия дает общие методы содержательного анализа, а информатика даёт общие методы формального анализа предметных областей (особенно, теоретическая, математическая информатика).
Можно дать философское определение информатики: информатика - это наука, изучающая общие свойства и процессы отражения материи, порядок в материи, ее структурированность и отражение в сознании человека, общества.
Дадим математическое определение информатики (определение математической информатики): информатика - наука, изучающая вопросы построения и исследования математических методов и моделей, алгоритмов, формальных систем для описания и актуализации различных информационных систем и процессов, различных классов операционных пространств. Эта – наука, математически (формальным языком) описывающая и исследующая их инварианты, абстрагируясь при этом от материальной основы информационных процессов.
Фундаментальность информатике придаёт не только широкое и глубокое использование математики, формальных методов и средств, а общность и фундаментальность её результатов, их универсальная методологическая направленность в производстве знаний. В этом смысле математическая информатика аналогична математической физике, математической биологии, математической экономике и др.
Предмет информатики точно (“математически”) невозможно определить, в силу его сложности, многосторонности, динамической изменчивости. Тем не менее, можно отметить следующие три основные ветви информатики (в классическом понимании), определяемые её познавательной и прагматической функциями, её внутренней и внешней сущностями (заметим, что деление информатики как науки и человеческой деятельности на те или иные части зависит от целей, задач, ресурсов).
Теоретическая, математическая информатика (brainware) изучает теоретические проблемы информатики (большей частью связанные с формальными системами, моделями, алгоритмами и теорией программирования, кодирования и организации систем).
Практическая, прикладная информатика (software) изучает практические, конкретные проблемы информатики (большей частью связанные с программированием и использованием моделей, программными и компьютерными технологиями и системами).
Техническая, инженерно-физическая информатика (hardware) изучает инженерно-физические, технические проблемы информатики (большей частью связанные с разработкой и использованием технических средств обработки информации, ЭВМ и систем ЭВМ, сетей).
Информатика базируется на следующих основных и важных понятиях:
информация и сообщение, в частности, получение, переработка, сжатие, актуализация информации сообщениями различного типа;
алгоритм и алгоритмизация, в частности, программа и программный комплекс, проектирование программ и программирование;
система и структура, отношение и связь, порядок, выбор, в частности, информационные система и структура, отношения в них;
модель и моделирование, в частности, описание и исследование систем с моделей и моделирования;
исполнитель и его операционная среда, в частности, ЭВМ и система ЭВМ;
языки и грамматики, в частности, алгоритмические языки, языки программирования, языки общения с различными системами и средами;
проектирование систем и технология, в частности, информационная, компьютерная технология.
Предметная область науки “информатика” - информационные процессы и системы, модели, языки их описания, технологии их актуализации, направленные как на получение знаний (это - внутренняя сущность информатики), так и на применение знаний, принятие на их основе решений в различных предметных областях (это - внешняя сущность информатики).
Эти информационные процессы могут происходить в живых существах (организмах), автоматах (технических устройствах), обществе, в индивидуальном и общественном сознании.
f:real;
i,n:longint;
begin
write('Write n: ');readln(n);
f:=1;
for i:=1 to n do
begin
f:=f*i;
end;
writeln('fact: ',f:0:0);
end.