Умоляю ! в папке my game находятся файлы 1. my_game. exe 2. my_game. txt 3. my_game. bmp 4. my_game. avi 5. my_game. wav определите файл, в котором может быть записана инструкция к игре . определите файл, который нужно открыть, чтобы запустить игру. определите файл, в котором может храниться заставка к игре . определите файл, в котором может быть записан демонстрационный ролик к игре . определите файл, в котором может быть записано музыкальное сопровождение к игре.

var

i,s: integer;

begin

s: =0;

for i: =2 to 5 do

s: =s+i*i;

writeln(s);

end.

program z_array; uses crt; var a: array[1..100,1..100] of integer; m,n,i,j: byte; sum: integer; begin clrscr; writeln('введите количество строк матрицы'); readln(n); writeln('введите количество столбцов матрицы'); readln(m); writeln('введите элементы матрицы'); for i : = 1 to n dofor j : = 1 to m dobegin write('a[',i,',',j,'] = '); readln(a[i,j]); end; writeln('данная матрица'); writeln; sum : = 0; for i : = 1 to n dobeginfor j : = 1 to m dobegin write(a[i,j]: 5); if (j < i) then sum : = sum + a[i,j]; end; writeln; writeln('искомая сумма = ',sum); readln; end.