2. Бірінші бағанның есептеу тәсілін түсіндір. Осы біліміңді пайдала- нып, екінші бағандағы мысалдарды қалай есептеуге болады?
(40 + 18) : 2 = 40:2 + 18:20
58:2 = 40:2+ 18:2 = D
(80 + 16) : 4 = 80 : 4 + 16:4 = 0
96 : 4-8 + 16:
(400 + 180):2400:2 + 180 : 2 = 0 580 : 2 =
(400 + 180) : 20 = 400 : 20 + 180 : 20 = 0 580 : 20 =
(800 +160) : 4 - 800:4+ 160 : 4 = D 960 : 4 =
960 : 40 =
(800 + 160): 40 - 800 : 40 + 160 : 40 = берем
Таким образом, в природе не существует вредных видов. Виды приносить вред здоровью человека и его хозяйству, являются необходимыми компонентами природных сообществ. Если из экосистемы изъять любой вид, равновесие в ней может нарушиться. Поэтому следует не уничтожать вредный вид, а ограничивать его численность, чтобы он не смог принести ощутимый вред хозяйству человека.Животные играют важную роль в обеспечении плодородия почв, опылении многих цветковых растений, распространении плодов и семян. Среди животных есть и так называемые санитары природы, которые перерабатывают остатки растений, трупы животных, очищают водоемы. Материал с сайта http://worldofschool.ru
Животные — неотъемлемые компоненты экосистем, они играют важную роль в природе: принимают активное участие в процессах почвообразования, играют роль «санитаров», служат пищей для других видов животных.
program one;
uses crt;
var A: array [1..6] of integer;
i,k,Amin,Amax,S: integer;
begin
readln (A[i]);
Amax:=A[1];
k:=1;
for i:=2 to 6 do begin
if A[i]>Amax then begin
k:=i;
Amax:=A[i];
end;
end;
Amin:=A[1];
k:=1;
for i:=2 to 6 do begin
if A[i]<Amin then begin
k:=i;
Amin:=A[i];
end;
end;
S:=0;
for i:=1 to 6 do begin
if (A[i]mod 2=0) and (Amax>A[i]) and (Amin<A[i]) then
S:=S+A[i];
end;
writeln ('Сумма положительных чисел между минимальным и максимальным значениями равна: ', S);
end.
2)
program two;
uses crt;
var x,a,b,i,n: integer;
y: real;
begin
readln (a,b,i,n);
x:=a;
repeat
if -2<=x<=2 then
y:=sqr(x)-1
else
y:=sqrt(x-1);
writeln (y:3:4);
i:=i+n;
until x>=b;
end.