Единицы измерения информации:
1 байт = 8 бит
<span>1 килобайт (Кб) = 1024 байт</span>
1 мегабайт (Мб) = 1024 килобайт
1 гигабайт (Гб) = 1024 мегабайт
<span>1 терабайт (Тб) = 1024 гигабайт</span>
Программа (без проверки исходных данных):
var a,b,y,z:real;
begin
write('a, b: ');
readln(a,b);
y:=cos(sqrt(a+b));
z:=ln(sin(y)/cos(y));
writeln('ln(tg(cos(sqrt(a+b)))) = ',z);
end.
Пример:
a, b: 0.5 0.8
ln(tg(cos(sqrt(a+b)))) = -0.813058267838025
<em>// PascalABC.NET 3.3, сборка 1561 от 02.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Range(-40,40,14).Select(x->x/10).Tabulate(x->x*x+2).Println;
Range(-4,4).Tabulate(x->x*x+2).Println;
end.
<u>Результат</u>
(-4,18) (-2.6,8.76) (-1.2,3.44) (0.2,2.04) (1.6,4.56) (3,11)
(-4,18) (-3,11) (-2,6) (-1,3) (0,2) (1,3) (2,6) (3,11) (4,18)
4096 символов заняли 2 кб, один символ занимает 2 байта. Посчитай теперь мощность.
<span>Вот тебе тут подсказывают, ты хоть чему-то при этом учишься? Или считаешь, что ты ходишь в школу, чтобы тебя там мучали, а деньги зарабатывать ты и так уже можешь? Да, есть такая работа, только ты не всегда будешь молодой, станет тебе 35, никто тебя покупать уже не будет. Может, дальнобойщик какой рублей за 300 возьмёт и всё. Лучше всё-таки учись.</span>