Даны 20 целых чисел среди них найти количество четных количество кратных 5 и количество двузначных

Паскаль? если да то код ниже program noname; var i, a, b, c, n: integer; begin a: =0; b: =0 c: =0; for i: =1 to 20 do begin readln(n); if (n mod 2=0) then a: =a+1; if (n mod 5=0) then b: =b+1; if (n> 9) then if (n< 100) then c: =c+1; end; writeln(a); writeln(b); writeln(c) ; end.

В
ллплплпдпдплплплпу8уща

9 значений. Из алгоритма видим, что значения M будут неотрицательными. Тупо берём Ексцель и смотрим:

0   8

1   0

2   -6

3   -10

4   -12

5   -12

6   -10

7   -6

8   0

9   8

10   18

11   30

12   44

Восемь случаев просто не запустят цикл и ещё один - M = 0 - запустит его один раз.

Да нету таких значений. Чтоб ложь былр в первой условии x = 5, но во втором условии будет истина и в итоге получается истина