1) 704 бит=88 байт
Для того чтобы перевести из биты в байты, необходимо поделить на 8. 704:8=88.
2) 12 мегабайт=0,01 гигабайт
Для того чтобы перевести из Мбайт в Гбайт нужно поделить на 1024. 12:1024=0,01 (округление до сотых)
3) 340 байт+1бит=2721
Сначала переведем байты в биты. 340*8=2720 байт. теперь выполним сложение: 2720+1=2721
4)9 килобайт=9216 байт
Не знаю о существовании кигабайтов. потому предполагаю об опечатке. скорее всего, гигабайт или килобайт (?). переведем килобайты в байты, для этого: 9*1024=9216.
5)14 кигабайт + 7 байт =114744 бит
переведем все единицы в бит:
14 килобайт= 14*1024*8=114688 бит. (сначала переводим в байты, умножив на 1024, а потом и в биты, умножив на 8).
7 байт=7*8=56 бит.
теперь сложим: 114688+56=114744 бит
Держи
Объяснение:
В одном доме живут Короленко, Крюков, Журавлёв и Горячко. Один из них — химик, другой — художник, третий — поэт, а четвёртый — баянист.
Известно, что:
Ни Короленко, ни Журавлёв, ни Горячко не умеют играть на баяне;
Журавлёв и Горячко не увлекаются точными науками;
Поэт и баянист в воскресенье уезжают на дачу к Журавлёву;
Художник собирается нарисовать портрет Короленко и Горячко.
a - Короленко
b - Крюков
с - Журавлев
d - Горячко
химик | худож | поэт | баян |
a | 1 | 0 | 0 | 0 |
b | 0 | 0 | 0 | 1 |
c | 0 | 1 | 0 | 0 |
d | 0 | 0 | 1 | 0 |
Var
n : word;
a, max, i: integer;
Begin
repeat
write ('N = ');
readln (n);
until (n>0) and (n<=1000);
write ('A=');
read(a);
if a mod 4=0 then max:=a;
while i<>n-1 do begin
write ('A= ');
readln (a);
if (a>max) and (a mod 4=0) then max:=a;
i:=i+1;
end;
writeln ('Max:', max);
End.
Как то так
переменная N отвечает за кол-во вводимых цифр
а А за сами числа. Для удобства поменяй имена переменных, просто я так привык обозначать. Прогу проверял вроде работает. Надеюсь Удачи!