Ответ:
компоненты: солнце, планеты, спутники планет, астероиды, кометы.
Рассматривать можно планеты и их спутники.
Var i,k:integer;
begin
k:=0;
for i:= 100 to 1000 do if (i mod 5=0) and (i mod 21=0) then k:=k+1;
write(k)
<span>end.</span>
const n = 10;
var a: array [1..n] of integer;
i: integer;
begin
for i:= 1 to n do readln(a[i]);
writeln('В прямом порядке: ');
for i:= 1 to n do write(a[i],' ');
writeln;
writeln('В обратном порядке: ');
for i:= n downto 1 do write(a[i], ' ');
end.
N=12
m=11
k=12-11+5=6
<span>B[12,11]=12*12-11*11+6=29</span>