===== PascalABC.NET =====
-1-
begin
var x := ReadReal('Введите вклад?');
var n := ReadInteger('Введите срок?');
for var i := 1 to n do
begin
x *= 1.03;
Writeln(i, ' год - ', x:0:2, ' руб')
end
end.
-2-
begin
for var i := 1 to 10 do
Writeln('5*', i, ' = ', 5 * i)
end.
-3-
begin
var s := ReadSeqReal('Введите 5 любых чисел:', 5).Sum;
Println('Их сумма равна', s);
end.
1) 133 кБайт = 136192 байт = 1089536 бит размер файла для передачи
2) 128 Кбит/сек = 131072 бит/сек скорость передачи по сети
3) 1089536 бит / 131072 бит/сек = 8, 31 сек - времени будет проходить передача этого файла
Ответ: 8,31 сек
N=8, m=0 - это значит, что числа должны быть 8-битными.
Чтобы перевести число в доп.код, нужно взять инверсию и прибавить 1.
A = -44 = -(00101100) = 11010011 + 1 = 11010100
B = -6 = -(00000110) = 11111001 + 1 = 11111010
Складываем
A + B = 11010100 + 11111010 = 11001110
Для проверки в 10 коде переводим опять из доп.кода.
-(11001110) = 00110001 + 1 = 00110010 = -(32 + 16 + 2) = -50
-44 + (-6) = -50
Все правильно.
1.
X&¬M&¬HvX&M&HvX&¬M&H
Упростим:
<span>X&¬M&¬HvX&&<span>H
2.
</span></span><span>Не все слоны серые и пять не равно дважды два
</span>3 и 4 смотреть прикрепленные файлы.
Лист Excel живой, можно подставить свои данные.
Таблицу истинности подставляем в лист СДНФ3, получаем формулу, упростив, получим результат.
Лист защищен без пароля, чтобы случайно не повредить формулы. Снимаем защиту, копируем элементы, получаем результат.
Болт и чертеж не подходит
самолет и лист метала не подходит