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