1.в одномерном массиве 30 целых чисел, найти произведение положительных элементов. 2.в одномерном массиве 20 целых чисел, найти среднее арифметическое его наибольшего и наименьшего элементов.

Program z567;

 Var a: array [1..30] of integer;

     b: array [1..20] of integer;

     i,max,p,min:integer; s:real;

     

Begin

 for i:=1 to 30 do

   a[i]:=random(10)-5;

 for i:=1 to 20 do

   b[i]:=random(10);

 

 for i:=1 to 30 do

   write(a[i],'  ');

 

 p:=1;

 for i:=1 to 30 do

   if (a[i] > 0) then p:=p*a[i];

   

 writeln('');  

 writeln('1-ое задание: ', p);

 

 for i:=1 to 20 do

   write(b[i],'  ');

 

 max:=b[1];

 for i:=2 to 19 do

   if (b[i] > max) then max:=b[i];

   

 min:=b[1];

 for i:=2 to 19 do

   if (b[i] < min) then min:=b[i];

   

 s:=(min+max)/2;

 writeln('');  

 writeln('2-ое задание: ', s);

End.

1. Текстовый, как следствие из символьного (string), числовой (int, double, float), символьный (char), логический (bool).

2. Символ записывается в ординарных кавычках и может содержать как букву, так и само число. А число может записываться только с цифр (а также в некоторых языках (С++) добавляется f, d для явного обозначения, что это число типа float, decimal и так далее)

3. Конкатенация - это логическая функция, а в программировании просто сложение. "Hello" + ", " + "World!" = "Hello, World!"

4. Количество символов строки, не считая управляющие символы (\n - переход на новую строку, \t - табуляция и так далее)

5. В разных языках программирования по-разному.

Python: <>.len()C++: <>.length()C#: <>.Length()

6. Смотря что понимают под "вырезкой". Обычно в функциях по поиску возвращается именно индекс первого вхождения части в строке. Такие функции - <>.find(), <>.IndexOf().

Снимать «домашнее кино» хотят и любят все, но при этом слова «видеоредактор и видеомонтаж» многих приводят в уныние и вызывают даже некоторый трепет, как перед чем-то сложным и трудным.

Однако давайте вспомним совсем недалекое когда любительское кино снималось на пленку. Видеомонтаж в те годы состоял исключительно из разрезания, вырезания и склеивания кусков пленки. И следует заметить, получались весьма неплохие короткометражки. Единственно, о чем приходилось мечтать, - это о технической коррекции фильма, так как яркость, контраст, цветовой баланс и кадрирование можно было изменить только во время съёмки, задавая