#include <iostream>
using namespace std;
int main(){
int a;
cin>>a;
switch (a%2){
case 0:
{
cout<<"Yes";
break;
}
default:
cout<<"No";
}
cin.get();
cin.get();
return 0;
}<span>
</span>
Решение показано в прилагаемом файле.
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
var b:=a.Pairwise; b.Println;
Writeln('Найдено пар: ',
b.Where(x->(x[0]<0) and x[1].IsEven or
(x[1]<0) and x[0].IsEven).Count)
end.
<u><em>Тестовое решение</em></u>
n= 10
-37 -71 -71 -65 73 -66 -33 -85 62 -92
(-37,-71) (-71,-71) (-71,-65) (-65,73) (73,-66) (-66,-33) (-33,-85) (-85,62) (62,-92)
Найдено пар: 3
надо 110в 12 перевести в десятичную тоесть разделить на десять пока числа не закончатся
Ответ:
640 бит
Объяснение:
Длина строки — 40 символов.
Т.к. каждый символ кодируется 16 битами (1 символ весит 16 бит), то умножаем 40 на 16 и получаем 640 бит.