1) 16х=128 кб - переведём кб в бит 128 кб = 128 *1024 * 8 = <span>1048576</span>
дальше проще 16х=<span>1048576</span>
х=<span>1048576</span> : 16
х=<span>65536</span>
2) 8х=32 кб - так же переводим в биты 32кб=32*1024*8=<span>262144</span> бит
8х=262144
х=262144 : 8
х=<span>32768</span>
A1 A2 B1 B2 C1 C2 ---> 6 ячеек
Program one;
Var a:array[1..9999] of rial; i,m,n,k:integer;
Begin
K:=1;
Readln (n);
For i:=1 to n do begin
Readln(a[i]) ;end;
For i:=1 to n do begin
If (a[i]>0) then a[i]:=a[i]*0,4;
If (a[i]=0) then a[i]:=0,5; If (a[i]>0) then k:=k*a[i];
If (a[i])<0) then m:=m+a[i];
End;
Writeln (k,m);
End .
// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
Writeln(ReadlnString('n=').Count(x->x='0'),' нулей');
end.
<u><em>Тестовое решение:</em></u>
n= 5350004533300045645600
8 нулей
Начальный день, когда растение было высотой 20см, считаем нулевым. Через день растение вырастет на 2 см, станет 22 см и это будет 1-й день.