3200 Байт = 3200*8 бит = 25600 бит = 25600 / 1024 КБит = 25 Кбит
Не знаю, как вы хотели, чтобы это представили через степень двойки.
var d, m:integer;
var h:real;
begin
readln(d);
m := d * 2;
h := m / 60;
m := m mod 60;
write('Количество часов = ' + Int(h) + ' количество минут = '+ m)
end.
10 Кбайт
Решение: 2^i=16 i=4 бита на символ
Объем=Все символы на вес одного символа
10*32*64*4 и делим на 8*1024(чтобы перевести в Кбайты)
<span>1. </span><span>Private Sub CommandButton1_Click() </span><span>
<span>Dim n, s As Single </span>
<span>n = Val(TextBox1.Text) </span>
<span>If (n < 500) Then s = n </span>
<span>If ((n >= 500) And (n <= 1000)) Then s = n
* 0.95 </span>
<span>If ((n > 1000) And (n <= 10000)) Then s =
n * 0.93 </span>
<span>If (n > 10000) Then s = n * 0.91 </span>
<span>MsgBox (s) </span>
<span>End Sub</span></span>
Текстовый редактор это microsoft word,предназначенный для просмотра документов и создания их, чтобы вставить символ, надо выбрать параметр вставка, нажать на значок символ и выбрать его,чтоб установить размер шрифта, нужно перейти на главную страницу и выбрать желаемый шрифт, чтобы текст был курсивом надо на главной странице выбрать букву Ч подчеркнутую, чтобы сохранить файл надо выбрать значок файла и нажать сохранить.