В ромбе a mod 2=0
если да то sqr(a)
если нет то <span>exp(3*ln(a))
Надеюсь на лучший ответ:)</span>
function myFunction(x: real):real;
begin
if (x>=-10) and (x<2) then
myFunction:=sqr(x)+4*x-7 else
if ((x<-10) and (x<>0)) or (x>=2) then
myFunction:=1/(sqr(x)+4*x-7);
end;
var x,y: real;
begin
write('Введите x: ');
readln(x);
y:=myFunction(x);
writeln('y = ',y);
end.
1.внешней
2.памяти
3.телефоне
4.файлов.
Это же так просто .
Информационный процесс- это совокупность действий, проводимых над информацией для получения какого-либо результата.
А сама информация- это сведения, знания, получаемые из окружающего мира.
Человек воспринимает этот мир с помощью чувств, например, обоняние, осязание, и так далее.
Он получает правильно организованную, доступную,понятную, достоверную, полную, точную информацию из каких-либо источников: интернет, телевизор, журнал.
Затем он ее передает другим человечкам.
Сначала использовался язык жестов, а затем появилась устная речь...
Program n1;
var a: array[1..30] of integer;
n,i: integer;
function st(i: integer): integer;
begin
st:=1;
for i:=1 to i do st:=st*2
end;
begin
readln(n);
for i:=1 to n do a[i]:=st(i);
for i:=n downto 1 do write(a[i],' ');
end.