Текст занимает 0, 25 кбайт памяти компьютера. сколько символов содержит этот текст?

0,25 кб памяти - это 256 байт , а минимальный объем инфо - 1 бит . в одном байте 8 бит . получаем 2048

// pascalabc.net 3.1, сборка 1230 от 27.04.2016 begin   var a: =readreal('введите число: ');   var y: =a*a; // a^2   y: =y*y; // a^4   y: =y*y; // a^8   write('a^8=',y,', a^9=');   y: =y*a; // a^9   writeln(y) end. тестовое решение введите число: 2.73 a^8=3085.32683368301, a^9=8422.94225595462 версия для старых паскалей: var   a,y: real; begin   write('введите число: '); read(a);   y: =a*a; // a^2   y: =y*y; // a^4   y: =y*y; // a^8   write('a^8=',y,', a^9=');   y: =y*a; // a^9   writeln(y) end.

Const n=30;   var a: array[1..n] of integer; i: integer;   begin randomize; writeln('исходный массив: '); for i: =1 to n do   begin   a[i]: =random(21)-10;   write(a[i]: 4);   end; writeln; writeln('измененный массив: '); for i: =1 to n do   if a[i]< 0 then a[i]: =5 else a[i]: =2; for i: =1 to n do write(a[i]: 4); writeln; end. пример (для n=10): исходный массив:   -2   6   -4   7   -4   4   -9   5   2   1 измененный массив:     5   2   5   2   5   2   5   2   2   2