Я думаю, у Вали зимой, у Кати осенью, у Наташи весной, у Маши летом.
<em>// PascalABC.NET 3.2, сборка 1370 от 24.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(10,-100,100); a.Println;
var n:=a.Where(x->x.IsEven).Count;
Writeln('Четных- ',n,', нечетных- ',10-n)
end.
<u>Пример</u>
44 79 -39 29 -81 -50 33 -96 52 -47
Четных- 4, нечетных- 6
277(8) = 2*8^2+7*8^1+7*8^0=128+56+7=191(10)
191(10)-27(10)=164(10)
164(10)=10100100(2)=A4(16)
Это 5
#include <iostream>
using namespace std;
int main() {
double a;
int b, proizv=1;
cin>>a;
while(a>0) {
b=a%10;
if(b%2!=0)proizv*=b;
a/=10;
} cout<<proizv<<endl;
return 0;
}
Это 6
#include <iostream>
using namespace std;
int main() {
int a;
int b, max=-1000000, proizv=1;
cin>>a;
do {
b=a%10;
if(b>max)max=b;
if(b%2!=0)proizv*=b;
a/=10;
}while(a>0);
cout<<proizv<<' '<<max<<endl;
return 0;
}
<span>Операционная система (ОС) - это комплекс программного обеспечения, предназначенный для снижения стоимости программирования, упрощения доступа к системе, повышения эффективности работы.
</span>