Пример в Excel 2003
Ярлычки листов соответствуют № задания
//Общее сопротивление сети:
// 1/R = 1/r1 + 1/r2
// 1/R = (r2+r1)/(r2*r1)
// R = r2*r1 / (r2 + r1)
//Закон Ома для участка цепи:
// I = U/R
var
r1,r2,u : integer;
R,I : real;
begin
writeln ('Введите значения сопротивления (r1 r2)');
readln (r1,r2);
writeln ('Укажите напряжение на концах цепи (u)');
readln (u);
R := r2*r1 / (r2 + r1);
I := U/R;
//Фактически можно не использовать переменную R
//А вставить выражение сразу
// I := U/( r2*r1 / (r2 + r1) );
writeln ('Сила тока на участке = ',I);<span>
end.</span>
Ответ:
48 бит = 6 байт
160 бит = 20 байт
512 байт = 0.5 КБ
2048 КБ = 2 МБ
1024 КБ = 1 МБ
81920 бит = 10 КБ
Когда бит переводим в байт, мы делим на 8, когда байты в значения выше, делим на 1024, допустим байты в килобайты, мы число байтов делим на 1024. Если же нам надо перевести с большего в значение ниже или еще ниже, мы умножаем на 1024
А если надо перевести в биты, нужно умножить на 8
Var
Pr: set of 1..20;
x: integer;
begin
Pr := [1, 2, 3, 5, 7, 11, 13, 17, 19];
writeln('Вводите целые числа от 1 до 20, выход по 99');
repeat
write('Число ');
readln(x);
if x < 21 then
if x in Pr then writeln('простое')
else writeln('не простое')
until x = 99
end.
Тестовое решение:
Вводите целые числа от 1 до 20, выход по 99
Число 18
не простое
Число 3
простое
Число 15
не простое
Число 23
Число 19
простое
Число 99
вот так расшифровывается эта хрень
1)либо х в степени (х/4) или х √(х/4)
2)либо 1/ (а в степени (в/а)) или 1/ (а√в/а))
3) либо а в степени (1/с/в/в) или а √(1/с/в/в)
в таких номерах обычно 2 решения (так нам объясняли)