Var y,a,x:real;
begin;
readln(x);
readln(a);
if x=0 then exit;
y:=sqr(a)+5*x-8/(4*x)-8+(6*x/2);
writeln(y);
end.
Пример схемы по этой формуле.
Лист Excel по двойному щелчку заполняет значение функции.
Uses crt; (Подключение внешних файлов)
Var
ves: real;
m: real;
Begin
clrscr;
write('ves=');
read(ves);
m: = ves * 0.65;
writeln ('Масса молекул кислорода', m:2:1, 'кг.');
readkey;
End.
254000000 = 254 · 10⁶
254 = 0.254 · 1000 = 0.254 · 10³, тогда
254 · 10⁶ = 0.254 · 10⁶ · 10³ = 0.254 · 10⁹
<h2>Ответ</h2>
0.254 · 10⁹