Program pas;
var
a:array[1..30] of integer;
i, k: integer;
s: real;
begin
s:=0;
k:=0;
for i:=1 to 30 do
readln(a[i]);
for i:=1 to 30 do
begin
if (not(a[i]mod 2=0)) then
s:=s+a[i];
inc(k);
end;
s:=s/k;
write(s:4:0);
end.
Class Program
{
static void Main(string[] args)
{
int res = 1;
Console.Write("Введите n: ");
int n = Convert.ToInt32(Console.ReadLine());
for(;n > 0; n--)
res *= n;
Console.Write("Результат: {0}",res);
Console.ReadLine();
}
}
<span>1600*1200*24=(в битах) и разделим полученное число на 2^23 - будут Мбайты (т. е. на 1024*1024*8) и подобрираем карту</span>
267810/3=89270 остаток 0
89270/3=29756 ост.2
29756/3=9918 ост.2
9918/3=3306 ост.0
3306/3=1102 ост.0
1102/3=367 ост.1
367/3=122 ост. 1
122/3=40 ост. 2
40/3=13 ост. 1
13/3=4 ост 1
4/3=1 ост1
<span>267810</span>₁₀=111121100220₃