Написать программу, которая вычисляет количество четных чисел. последовательность всех чисел задается с клавиатуры. признаком окончания ввода последовательности чисел является значение любого отрицательного числа. диапазон чисел {-10000; 10000}

203

389

Посмотреть ответы 2

Ответы на вопрос:

dimaschastny

Информатика

4,8(98 оценок)

Var x,y: integer; begin y: =0; repeat writeln('введите число'); read(x); if x mod 2 =0 then y: =y+1; until x< 0; writeln('количество четных цифр = ',y); end.

torin39193919

Информатика

4,8(48 оценок)

9разів було натиснуто на клавішу "shift". тому, що введено 9 літер: к > e > p > у > в > a > h > h > я к - 1 літера. е - 2. р - 3. у - 4. в - 5. а - 6. н - 7. н- 8. я - 9. але, можливо, що це слово вводилося завдяки клавіші "capslk", тоді не введенно жодного "shift". але в умові сказано, що це слово утворенно за "shift".