<span>PROGRAM PR17;
VAR
I,N:INTEGER;
S,SR,A:REAL:
BEGIN
WRITE(‘ Введите N’);
READLN(N);
S:=0;
FOR I:=1 TO N DO
BEGIN
WRITE(‘ Введите ‘,I,’ число’);
READLN(A);
S:=S+A:
END;
SR:=S/N;
43
WRITELN(‘Ответ: SR = ’,SR:8:3);
END.</span>
<span>Множество символов кодовой таблицы ASCII. Каждому символу приписывается целое число в диапазоне от 0 до 255.</span>
1-3, 2-2, 3-2 скорее всего, там плохо видно, 4- D:\каталог и все