Смотря с чего начинается с 0 или 1 массив , я просто решил написать пример программы , тут сам вводишь 10 чисел var i , k, n:integer; a: array [1..10] of integer; begin for i:=1 to 10 do readln(a[i]);k:=a[1]*a[2]*a[3]; n:=a[10]*a[9]*a[8]; writeln('произведение первых трех чисел= ',k); writeln('произведение последних трёх чисел= ', n); end.
Компьютерная программа — это последовательность инструкций, которая предназначена для исполнения вычислительной машиной. програмное обеспечение- совокупность программ позволяющих осуществить на компьютере автоматизированную обработку информации. Систе́мное програ́ммное обеспе́чение — комплекс программ, которые обеспечивают управление компонентами компьютерной системы, такими как процессор, оперативная память, устройства ввода-вывода, сетевое оборудование, выступая как «межслойный интерфейс», с одной стороны которого аппаратура, а с другой — приложения ... Прикладное ПО - совокупность программ для решения прикладных задач (задач пользователя). Прикладное ПО входит в состав программного обеспечения компьютера. Система програмирования - система для разработки новых программ на конкретном языке программирования
Существует три философские концепции информации: 1. Атрибутивная концепция. Информация является свойством всего сущего, всех материальных объектов мира. Информация — атрибут всех материальных объектов. 2. Функциональная концепция. Информация возникла вместе со Вселенной. Информация проявляется в воздействии одних объектов на другие, в изменениях, к котоым такие воздействия приводят. Информация — это атрибут, свойственный только живой природе. 3. Антропоцентрическая концепция. Информация существует лишь в человеческом сознании, в человеческом восприятии. Информационная деятельность присуща только человеку и происходит в социальных системах. Создавая информационную технику, человек создает инструменты для своей информационной деятельности
var
i , k, n:integer;
a: array [1..10] of integer;
begin
for i:=1 to 10 do readln(a[i]);k:=a[1]*a[2]*a[3];
n:=a[10]*a[9]*a[8];
writeln('произведение первых трех чисел= ',k);
writeln('произведение последних трёх чисел= ', n);
end.