Заполни таблицу "название" и "назначение" . тема "воспроизведение звука" икт 3 класс

Program q1;
uses crt;
const n=10;
var i,j:integer;
mass:array [1..n] of integer;
countNum:integer; // переменная для хранения количества нечетных чисел
proizv:integer; // переменная для хранения произведения нечетных чисел
BEGIN
proizv:=1; // так как, изначально равно 0, а при умножении на 0 будет всегда 0
{создание последовательности n целых чисел}
Writeln('Случайные целые числа: ');
for i:=1 to n do
begin
mass[ i ]:=random(9)+1; //присваеваем переменной случайное значение от 1 до 10
write(inttostr(mass[ i ])+', ');
end;
{Вычисление произведения и количества нечетных чисел}
for i:=1 to n do
if mass[ i ] mod 2 <> 0 then //проверяем не четное-ли число, если да, то.. .
begin
inc(countNum); //увеличиваем на один кол-во нечетных чисел
proizv:=proizv*mass[ i ]; // высчитываем произведение
end;
{Вывод результатов}
writeln;
writeln('Всего нечетных чисел: '+inttostr(countNum));
writeln('Их произведение: '+inttostr(proizv));
END.


program q2;
uses crt;
const n=10;
var i,j:integer;
mass:array [1..n] of real;
Summ:real; // переменная для хранения суммы чисел
MNum:real; // переменная для хранения среднего арифметического
BEGIN
{создание последовательности n отрицательных вещественных чисел}
Writeln('Случайные отрицательные вещественные числа: ');
for i:=1 to n do
begin
mass[ i ]:=((random(9)+1)+(random(9)+1)/10)*(-1); //присваеваем переменной случайное вещественное от 1 до 10
write(mass[ i ],'; '); //выводим
end;
{Вычисление среднего арифметического}
for i:=1 to n do
Summ:=Summ+mass[ i ]; // высчитываем произведение
MNum:=Summ/n;

{Вывод результатов}
writeln;
writeln('Среднее арифметическое: ',MNum);
END.

Современный бизнес невозможен без контактов с иностранными партнерами, а деловые переговоры - без переводчиков. Совместные проекты с западными компаниями, импорт оборудования и новых технологий потребовали перевода миллионов страниц текста. Резко увеличилось количество организаций, нуждающихся в версиях своих сайтов на английском языке. Казалось бы, престиж профессии переводчика и доходы этих специалистов тоже должны возрасти, но... Конкуренцию профессионалам составляют любители с бумагой об окончании курсов иностранных языков и все те, кто мало-мальски знает иняз. За услуги они готовы получать небольшие деньги, а работодатель не всегда объективно оценить качество их работы. В результате резко упал уровень переводов и подешевел сложный, требующий знаний, опыта и терпения, интеллектуальный труд переводчика. Начинающим придется не сладко. Чтобы добиться успеха в данной профессии, надо ориентироваться на самую высокую планку. Чтобы добиться успеха надо ориентироваться на самую высокую планку. Это раньше можно было работать, оставаясь средним переводчиком. В условиях, когда вокруг немало людей владеет иностранным языком, плохой или средний специалист уже не нужен.