1)32 символьный алфовит это 5 бит 5*80/8=50 байт
2)5*40*60*8:1024=93.75 кб
3)3*1024*8/6144=4
Ну если допусть что форматирование не изменяет размеры текста, то тогда получиться
50 * 60 * (1 + 0.25) = 3750 (символов)
Теперь остается вопрос какая это будет кодировка
Если кодировка ASCII например, то будет 1 символ = 1 байт
Если же кодировка UTF16, то будет 1 символ = 2 байта
Если например UTF8, туо тут так просто не определишь, бо там от 1 до 4 байт на символ в зависимости от частоты встречаемости, чтобы экономить
Например английские символы - 1 байт, а русские 2 байта
Program Numbers_Fib;
Var K, N, A, B, C: integer;
Begin
Writeln {введите номер N искомого числа Фибоначчи};
Readln (N);
A:=1; {первый элемент}
B:=2; {второй элемент}
For k:=3 to N do { цикл выполняется для получения элементов с 3-го по N-ый}
begin
C:=B+A; {новый элемент, с номером k}
A:=B; {элемент с номером k-1 становится k-2-м элементом }
B:=C; {элемент с номером k становится k-1-м элементом }
End;
Writeln {N,‘- ый элемент последовательности равен’, C};
End.