1) 82(16)=8*16+2=130(10). Ответ: 130
2) Объем сообщения 70х30х83=174300 байт, скорость передачи 33600/8=4200 байт/с, время передачи 174300/4200=41.5с
3) 45(8)=4*8+5=37(10). 10100001(2)=1+2^5+2^7=1+32+128=161(10). ответ: 161
4) 214/2=107 остаток 0. 107/2=53 остаток 1. 53/2=26 остаток 1. 26/2=13 остаток 0. 13/2=6 остаток 1. 6/2=3 остаток 1. 3/2=1 остаток 1. Ответ: 11010110
5) семестр (кодировка CP-866 "DOS")
Программы на pascal
1)
var
x, y: real;
begin
writeln('Введите х');
readln(x); //Вводим х
y:= sin(sqr(x));
writeln('y = ', y : 0 : 5); {Печатаем значение у с округлением до 5 знаков после запятой}
end.
2)
var
x, y: real;
begin
writeln('Введите х');
readln(x); //Вводим х
if x >= 0 then y:= cos(x) //Если х >= 0, то у = cosx, иначе у = 1 - 2sinx
else y:= 1 - 2 * sin(x);
writeln('y = ', y : 0 : 5); {Печатаем значение у с округлением до 5 знаков после запятой}
end.
Если все правильно, отметь решение как лучшее)
//PascalABC.NET
begin
var product: int64;
product := 1;
var seq := range(1, 99).Where(x -> x mod 2 <> 0).Select(x -> x * x);
foreach var x in seq do
product := product * x;
write(product);
end.
Идем с конца.
Из нечетных вычли 1 (получилось четное число), к четным прибавили 1 (нечётное). Отменяем это: к четным прибавляем 1, от нечётных отнимаем.
3216 -> 2307
Третья цифра была сдвинута на 3, при этом поменяв свою четность. 2 - четное число, значит, исходное число было нечётным и было сдвинуто на 3 влево. Отменяем, сдвигаем на 3 вправо: 2 -> 3 -> 4 -> 5.
Вторая цифра была сдвинута на 2, чётность не меняла, была и осталась нечётной. Она была сдвинута на 2 разряда влево, нам надо сдвинуть на 2 вправо: 3 -> 4 -> 5.
Первая цифра сейчас чётная (0), значит, была нечётной, её сдвинули на 1 влево. Сдвигаем на 1 вправо: 0 -> 1.
Нулевая цифра была сдвинута на 0 разрядов, поэтому осталась без изменений. Это цифра 7.
Искомый пароль: 5517.
(Ну и на всякий случай: не надо ставить такие простые пароли, не будьте, как Вася!)
A = «Число 22 — чётное число» true (истина)
B =«Волк — травоядное животное» false (ложь)
Значения логического типа boolean занимают 1 байт и принимают одно из двух значений, задаваемых предопределенными константами True (истина) и False (ложь).