Var
x,y:real;
begin
x:=2.509;
y:=(exp(3*ln(abs(x-3)))-5*x)/(sqr(x+2)+exp(ln(x)/5))*exp(3*ln(x+sqr(x)));
Writeln(y)
end.
<em><u>Результат выполнения программы:</u></em>
-393.821568095705
Смотря в какой программе работаешь.
Если не ошибаюсь, в паскале readln начинает выполнение действия с новой строки, в то время как read продолжает на старой строке. Но могу и ошибаться
1)16 бит=2 байта т.к 1 байт=8 бит
2)1024 КБ<2 МБ т.к 1 МБ=1024 КБ
3)2 ГБ=2048 МБ т.к 1 ГБ=1024 МБ
4)1 ТБ<2000 ГБ т.к 1 ТБ=1024 ГБ
321F1616 = 3∙165+2∙164+1∙163+15∙162+1∙161+6∙160 = 3145728+131072+4096+3840+16+6 = 328475810
Получилось: 328475810