Выяснить, каких цифр больше: четных или нечетных?
да
Чётных больше.........
И смысл?
Program primer; const n=5; var a:array[1..n] of integer; i:integer; begin writeln ('vvedite massiv'); for i:=1 to n do readln( a[i]); for i:=1 to n do if (a[i] mod 2=0)>(a[i] mod 2=1) then writeln ('ceotnih cisel bolise') else writeln('neceotnih cisel bolise'); readln; end.
в то меня сегодня послали с массивами этими)
препод)
я на 1ом курсе)
нет я не программист, я на химика учусь, поэтому информатика для меня темный лес. тема была пред и пост условия
поможешь?)