Паскаль: программа, по которой компьютер десять раз запросит ввод целых чисел и в результате сообщит, сколько введенно нечётных

[EvgeniaArtemovna]

Составьте программу, по которой компьютер десять раз запросит ввод целых чисел и в результате сообщит, сколько среди введенных нечетных чисел

[Вадим Мошев]

Решайте по аналогии с решением в теме http://www.programmersforum.ru/showthread.php?t=289578

[EvgeniaArtemovna]

Сообщение от Вадим Мошев

Решайте по аналогии с решением в теме http://www.programmersforum.ru/showthread.php?t=289578

Да не умею я. Меня мама, программист по образованию, засунула в чертов ВУЗ, связанный с программированием. Я ничего из этого не знаю, поэтому и прошу помочь

[EvgeniaArtemovna]

Тут же написано :"Помощь студентам".

[Вадим Мошев]

Скажите, а почему вы не обращаетесь к маме за помощью, а пишете на форум? Если она засунула вас в этот ВУЗ, то, значит, ей не всё равно, что будет с вами дальше. Поэтому, она не должна отказать в помощи, ИМХО.

[EvgeniaArtemovna]

Сообщение от Вадим Мошев

Скажите, а почему вы не обращаетесь к маме за помощью, а пишете на форум? Если она засунула вас в этот ВУЗ, то, значит, ей не всё равно, что будет с вами дальше. Поэтому, она не должна отказать в помощи, ИМХО.

Она на работе почти ежедневно с утра до поздней ночи, а когда приходит, то ей не до этой мелочи.
Судя по тем людям, которые здесь сидят, эта задачка вам на 1 зуб.
А я просто не хочу быть программистом, всю жизнь интересовалась языками и искусством, но не этим.
Прошу просто помочь и я навсегда пропаду с этого форума.

[Alex11223]

Ну так беги из вуза, толку его заканчивать?

[ViktorR]

Моё мнение, все не так плохо.
Мама знает, что лучше ...
Лингвисты и искусствоведы нанимают программистов для решения своих задач, а толком объяснить что им надо не умеют.
А тут возможность быть два в одном.
Конечно придётся напрячься, но для молодого целеустремлённого ...

По твоей задаче:
1. Напиши, например, цикл

for i := 1 to 1o do
begin
{тут пишешь код, в котором запрашиваешь ввод целых чисел и читаешь введенные числа}
{тут код для определения числа на четность}
end;
{тут пишешь вывод результата}

2. Для определения того, что число четное можно проверить его делимость на 2. Остаток должен быть равен нулю
Пример:

if i MOD 2 = 0 then {четное}
...
else {не четное}
...

3. В цикле должен быть условный оператор, в котором контролируется, в твоём случае, нечетность.
Используй для сравнения этот оператор - <> ) и считай число таких событий, например,

Nechet := Nechet + 1;

Да, перед началом цикла For необходимо переменную Nechet обнулить.
Так правильнее будет.

Попробуй самостоятельно связать сказанное.
PS: Есть еще функция Odd(n) - про неё лучше причитай сама.

Как-то так, ...

[phomm]

var i, j, cnt: Integer;
begin
  cnt := 0;
  Writeln('Vvedite 10 chisel');   
  For i:=1 to 10 do
   begin
      Readln(j);
      if j mod 2 = 1 // ostatok ot deleniya na 2 dlya nechetnyh = 1
        cnt := cnt + 1;
   end;
   Writeln('Nechetnyh chisel ', cnt);
   Readln;
end.

По аналогии (как Вадим сказал) поменял пару строк в коде, что Неверов писал.
Затрудняюсь сказать, насколько целесообразно дальше учиться на околопрограммерскую специальность, если у Вас тяга к этому отрицательная, но у Вас 2 выхода - либо сесть и таки учить (базовый паскаль вообще лёгкий - как английский с простейшей математикой и логикой, по порядочку всё), либо не заниматься этим и каким-либо образом прекратить это всё. А вообще совет - не заниматься ерундой, хочу не хочу, знаю не знаю - принимайте решение и выполняйте его, а не стойте на месте и не занимайтесь подстановкой костылей к своей ситуации (вроде попыток решения своих задачек первых часов обучения на форуме).
Не знаю, как Вы вообще могли попасть на такую специальность, там обычно надо по математике хорошо экзамены сдавать, а математика и программирование очень родственные и любить математику (и сдать на хороший балл), но не любить программирование - очень странно, если, конечно, не имела место быть протекция.

[ProBeginner]

А разве мама не должна была своей дочери рассказать всё про циклы, ещё так классе в шестом?