1. составьте схему по следующему описанию: близкие виды объединяются в один род. например: ворона, ворон, галка и грач объединены в род ворон. близкие роды объединяются в семейства: род ворон, род сорока, род сойка, род кедровка объединены в семейство врановые. в свою очередь, близкие семейства объединяются в отряды. так, семейство си- ницевые, семейство врановые, семейство ласточко- вые

№1. программа на паскале

program xxx;

  var n : integer;

              x : array[1..10] of integer;

begin

  for n: =1 to 10 do

      x[n]: =sqr(n) + 5;

  wreteln('последовательность х: ')

  for n: =1 to 10 do

          write(x[i]);

    readln

end.

program pr;

var mas: array[1..40] of integer;

i, sum: integer;

begin

randomize;

for i: =1 to 40 do mas[i]: =random(20);

for i: =1 to 40 do if mas[i]< =10 then sum: =sum+mas[i];

writeln ('сумма равна ', sum);

readln;

end.

программу проверил все работает