#include<iostream.h>
#include<conio.h>
#include<stdio.h>
int main()
{
int b; // наше число b
clrscr(); // очищаем экран
cout<<"Введите b: "; // Выводим на экран приглашение ввести и
cin>>b; // b присвиваем введённое значение
// если b=0 то выводим соответствующее сообщение
if (b==0) cout<<"Ноль Совсем Ноль \n ";
// если b<0 и остаток от деления на 2 =0 то это отрицательное четное число
if ((b<0) && (b%2)==0) cout<<"отрицательное четное число \n ";
// если b<0 и остаток от дления на 2 <>0 то это отрицательное нечетное число
if ((b<0) && (b%2)!=0) cout<<"отрицательное нечетное число \n ";
// если b>0 и остаток от деления на 2 =0 то это положительное четное число
if ((b>0) && (b%2)==0) cout<<"положительное четное число \n ";
// если b>0 и остаток от деления на 2 <>0 то это положительное нечетное число
if ((b>0) && (b%2)!=0) cout<<" положительное нечетное число \n ";
getch(); // ждём нажатия на любую клавишу перед закрытием
return 0; // стандартный выход
}
Program TwoSums;
Uses Crt;
var a:array[1..10] of integer;
i:integer;
s1,s2:longint
begin
clrscr;
write('Исходный массив:');
s1:=0;s2:=0;
for i:=1 to 10 do
begin
a[i]:=random(101)-50;
write(a[i]:3);
if (i mod 2)<>0 then s1:=s1+a[i]
else s2:=s2+a[i];
end;
writeln;
writeln('Сумма нечётных элементов массива:',s1);
writeln('Сумма чётных элементов массива:',s2);
if (s1=s2) then writeln('Суммы равны');
if (s1>s2) then writeln('Сумма нечётных элементов массива больше !')
else writeln(' Сумма чётных элементов массива больше !');
readkey;
end.