Сколько будет байтов в 0, 5 мегабайт?

В  одном  мб  1024  кб,  а  в  одном  кб  1024  байта,  следует  1024/2=512  кб 512*1024= 524  288  байт

.txt – первый формат для текстовых файлов, в котором не используется форматирование (размер шрифта, полужирный, отступ абзаца и содержит только текст.

.doc – формат, который использовался долгое время в текстовом редакторе word компании microsoft. наиболее распространенный для текстовых редакторов.

.docx – формат для текстового редактора word компании microsoft, который появился в пакете microsoft office 07 (2007 год) и имеется в office 10. не все редакторы поддерживают данный формат, так как эта лицензионная разработка компании microsoft.  

.odt – формат для текстового редактора write пакета свободный офис (openoffice).  

.rtf – формат для текстового редактора, имеющий возможность использоваться в разных операционных системах, то есть, можно переносить с компьютера, имеющего одну операционную систему на другой компьютер с другой операционной системой.

.pdf – формат для текстового файла, разработанных компанией adobe. имеется меньшие размеры и лучше передает рисунки по сравнению с другими форматами. когда он был разработан, то редактор для создания подобных файлов нужно было купить у компании adobe. в то же время для любого пользователя можно было скачать просмотровщик данного файла. многие компании делали текстовую информацию именно в этом формате, поэтому он стал популярен.

.chm – формат файла, который используется для хранения нескольких файлов формата html. создан для замены формата справочной системы. может иметь ссылки, по которым возможен переход на другую страниц

program pr1;

uses crt;

var  

  n: byte; // размерность массива

  i: byte; // счетчик массива

  a: array[1..30] of real; // массива чисел

  p: real; // произведение чисел

begin

  clrscr;

  write('введите размерность массива: ');

  readln(n);

  writeln('введите ',n,' элементов');

// блок ввода

  for i: =1 to n do

      readln(a[i]);

// блок вывода

  writeln('исходный массив');

  for i: =1 to n do

      write(a[i]: 6: 1,' ');

      writeln;

      readln;

// блок инициализации

  p: =1;

  for i: =1 to n do

      if(a[i]> p) then

        p: =p*a[i];    

  readln;

  writeln('p= ',p);

end.

возможно я не так понял , но вот