1. Задан массив: var C: array [1..10] of integer; Являются ли корректными имена и/или значения и/или индексы элементов массива :C[0]=10; C[20]=20;… 2. Задан массив: var R: array [1..34] of char; Являются ли корректными имена и/или значения и/или индексы элементов массива :R[33]=‘x’; R[34]=‘y’;… 3. Как изменится значение переменной S после выполнения фрагмента программы? s:=1; k:=0 for i:=1 to n do s:= s*f[i] ;

Задание 1:

Задан массив: var C: array [1..10] of integer; Являются ли корректными имена и/или значения и/или индексы элементов массива: C[0]=10; C[20]=20;

ответ: нет (так как в массиве C индексы объявлены от 1 до 10).

Задание 2:

Задан массив: var R: array [1..34] of char; Являются ли корректными имена и/или значения и/или индексы элементов массива: R[33]=‘x’; R[34]=‘y’;

ответ: да (при условии, что под ‘ ’ подразумевается ' ').

Задание 3:

Как изменится значение переменной S после выполнения фрагмента программы? s:=1; k:=0 for i:=1 to n do s:= s*f[i] ;

ответ: недостаточно данных (неизвестные массив f и переменная n).

Ятак понимаю, что "значение массива" - это сумма его элементов. если это  так, то вот решение: 1) var a,b: array[1..10] of real; s,k: real; i: integer; begin   wtiteln('init a: ')   for i: =1 to 10 do     begin     readln(k);     a[i]=k;     end;   wtiteln('init b: ')   for i: =1 to 10 do     begin     readln(k);     b[i]=k;     end;   s: =0;   k: =0;   for i: =1 to 10 do     k: =k+a[i];   k: =k/10;   for i: = to 10 do     s: =s+b[i];   s: =(s/10)+k;   writeln(s); end. 2) var a,b: array[1..10] of real; r,k: real, i: integer; begin   writeln('init a: ");   for i: =1 to 10 do     begin     readln(k);     a[i]: =k;     end;   writeln('init b: ");   for i: =1 to 10 do     begin     readln(k);     b[i]: =k;     end;   r: =0   k: =0;   for i: =1 to 10 do     k: =k+a[i];   for i: =1 to 10 do     r: =r+b[i];   r: =r-k;   writeln(r); end.