Уменя самостоятельная ! 1)в каком формате нужно сохранить файл чтобы он мог быть прочитан в других приложениях с сохранением форматирования? без сохранения? 2)почему для кодирования текстовой информации в компьютере перешли от однобайтовых кодировок к двухбайтовой кодировке?

1) если текстовые файлы, то *.txt обычный текст без форматирования. 2) двухбайтовые позволяют кодировать больше символов.

Pascalabc.net 3.3, эти строчки надо вставить между begin и end. 1.  20.to(35).print(chr(10)); 2. 10.to(readinteger).select(x -> x*x).print(chr(10)); 3. readinteger.to(50).select(x -> x*x*x).print(chr(10)); 4. readinteger.to(readinteger).print(chr(10)); a.to(b) возвращает последовательность чисел от a до b, select позволяет получить новую последовательность из старой (например, x -> x*x из x делает x в квадрате, то есть это функция, возводящая число в квадрат), print(delim) выводит элементы последовательности с разделителем delim, chr(10) - символ перевода строки.

Uses crt; const n=10; var a: array [1..n] of integer;     x,k,z: integer; begin       k: =0;       for x: =1 to n do       begin           write('a[',x,']: '); readln(a[x]);       end;       write('введите число: '); readln(k);       for x: =1 to n do             if a[x]=k then inc(z);       if z> 0 then  writeln('число ',k,' встречается в массиве ',z,' раз(-а).')             else writeln('число ',k,' не  встречается в массиве'); end.