Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ дан массив.найти кол-во чётных элементов

Автор: liveTOskate 7.11.2007 5:01

помогите,мне экзамен никак не здать mega_chok.gif

Автор: Lapp 7.11.2007 6:57

k:=0;  {счетчик четных чисел, обнуляем}
for i:=1 to n do               {проходим по всему массиву в цикле}
  if not Odd(a[i]) then Inc(k);   {если a[i] НЕ нечетное - увеличиваем счетчик}
WriteLn(k);    {вывод количества четных элементов}

Автор: Гость 7.11.2007 13:53

Спасиба!

Автор: Better Kind 7.11.2007 19:45

Цитата(Lapp @ 7.11.2007 2:57) *

если a[i] НЕ нечетное

[off]Как завернул )))[/off]