Программа для решения задачи:
var x,f:real;
begin
write('x=');readln(x);
if x<=-3 then f:=9 else f:=1/(x*x+1);
writeln('f(x)=',f:5:3);
<span>end.
Пример:
x=-4
f(x)=9.000
Блок-схема - в прилагаемом файле.</span>
Program n1;
var n,i: integer;
begin
readln(n);
for i:=1 to n do if i mod 2<>0 then write(i,' ');
end.
Оператор - одно из составляющих выражения, обозначающих конкретно действия.
+ это оператор сложения
= это оператор присвоения значения (си/с++)
выражение это a = b + c;
когда переменной 'а' присваивается значение суммы переменных 'b' и 'c'
Program z;
var x,max,n,k:integer;
begin
x:=-1;
max:=-1;
n:=0;
k:=0;
while x<>0 do
begin
readln(x);
k:=k+1;
if x>max then begin max:=x; n:=k; end;
end;
writeln(n);
end.