Var i,ne,ch,n:integer; a:array of integer; //объявление динамического массива begin write('Введите длину массива :'); readln(n); randomize; a:= new integer[n+1];// установка размера (n+1) динамического массива for i:=1 to n do begin a[i]:=random(80)+20; write(a[i],' ');//Вывод на экран полученного массива if odd(a[i]) then inc(ne);// odd() - функция,определяющая нечетность числа.Возвращает значение True, если число нечетное end; //inc() - функция инкремент - увелечения на 1. ch:= n-ne; writeln; writeln('Нечетные=',Ne); writeln('Четные=',Ch); end.
Var i,ne,ch,n:integer; a:array of integer; //объявление динамического массива begin write('Введите длину массива :'); readln(n); randomize; a:= new integer[n+1];// установка размера (n+1) динамического массива for i:=1 to n do begin a[i]:=random(80)+20; write(a[i],' ');//Вывод на экран полученного массива if odd(a[i]) then inc(ne);// odd() - функция,определяющая нечетность числа.Возвращает значение True, если число нечетное end; //inc() - функция инкремент - увелечения на 1. ch:= n-ne; writeln; writeln('Нечетные=',Ne); writeln('Четные=',Ch); end.
using namespace std;
int main() {
int x;
cin >> x;
int sum = x % 10 + (x / 10) % 10;
if (sum < 10) cout << "YES" << endl;
else cout << "NO" << endl;
system("pause");
}