writeln('indexi elementov kotorie bolshe prediduschego: ');
writeln;
for i: =2 to 10 do begin
if a[i]> a[i-1] then write(i,', ');
end;
for i: =2 to 10 do begin
if ((a[i]> =0) and (a[i-1]> =0)) or ((a[i]< 0) and (a[i-1]< 0)) then p: =p+1;
end;
writeln;
if p> 0 then writeln('masiv imeet pari sosednih elementov s odnakovimi znakami') else writeln('masiv ne imeet pari sosednih elementov s odnakovimi znakami');
readln(s);
end.
Ответ дал: Гость
посадка дерева: 1.купить семя.
2.найти место для посадки.3.вскопать яму.4.посадить семя.5.закопать яму.переход улицы по светофору: 1.подойти к дороге (к светофору)2.посмотреть на цвет, который сейчас горит.3.дождаться нужного цвета.4.перейти дорогу.5.отправиться дальше.
Популярные вопросы