Var x,y: real;
begin
readln(x);
y:=x/(1+((x*x)/5+(x*x*x)));
writeln(y);
end.
Изменились носители информации из-за нового дела, культуры и время.
var
i:integer;
begin
for i:=60 to 70 do write (chr(i),' ');
readln;
end.
1 - 26
2 - 6
3 - 30
4 - 6
5 - 1
6 - 4
7 - 8
div - частное от целочисленного деления, например, 22 div 4 = 5, 26 div 6 = 4 и тд
mod - остаток от целочисленного деления, например, 22 mod 4 = 2, 24 mod 5 = 4 и тд