1)
var
i,k:integer;
a:array [1..14] of integer;
begin
k:=0;
for i:=1 to 14 do
a[i]:=random(46)-15;
write(a[i]:3);
if a[i] mod 2=0 then k:=i;
end;
if k>0 then
for i:=k to 13 do a[i]:=a[i]+1;
a[14]:=0;
writeln;
for i:=1 to 14 do write(a[i]:3);
end.
2)
for i:=1 to 7 do
k:=a[i];
a[i]:=a[i+7];
a[i+7]:=k;
В какой оболочке земли живёт большинство живых организмов?
Из каких неживых частей состоит экосистема
На какие расы делятся население земли
Определение статуса военнослужащего (краткий ответ!!)
Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.