Usb флеш накопитель объем 36 гигабайтов полностью заполнен файлами объемом 1 мегабайт каждый угольный файл это документ объемом 100 листов.сколбко часов потребуется для печати всех материалов на принтере со скоростью 1 лист в секунду? в положительность 1 гб равным 1000 мб.

Смотря в какой кодировке.
Если кодировка КОИ-8, значит один символ кодируется, то есть весит 8 бит. И так всегда.
Значит:
2000символов×8бит=16000бит=16000:8=2000байта(так как что бы перевести биты в байты, нужно разделить кол-во битов на 8, а что бы перевести в килобайты, нужно ещё разделить и на 1024).Но тут в килобайты перевести нельзя. Невозможно.
размер сообщения в кодировке КОИ-8.
Если же кодировка Unicode, то это значит, что один символ кодируется, то есть весит 16 бит.
Значит:
2000символов×16бит=32000бит=32000:8=4000байт. Как и в первом случае, перевести тут в килобайты нельзя. Невозможно.
размер сообщения в кодировке Unicode.

Для того, чтобы эта программа заработала надо добавить перед описанием процедуры F следующую строчку:
procedure G(n: integer);forward;
Так как в процедуре F есть вызов процедуры G описанной дальше по тексту программы.
После исправления кода и запуска программы с F(12) получим 17 звездочек. По шагам это будет выглядеть так:

 Вызов процедуры F и выполнение
* n = 12
* n = 12
Вызов процедуры G и выполнение
* n = 11
* n = 11
Вызов процедуры F и выполнение
* n = 9
* n = 9
Вызов процедуры G и выполнение
* n = 8
* n = 8
Вызов процедуры Fи выполнение
* n = 6
* n = 6
Вызов процедуры G и выполнение
* n = 5
* n = 5
Вызов процедуры F и выполнение
* n = 3
* n = 3
Вызов процедуры G и выполнение
* n = 2
* n = 2
Вызов процедуры F и выполнение
* n = 0