Var a:array[1..10]of real;
i:integer;
begin
for i:=1 to 10 do begin
a[i]:=random(10,100)/10;
write(a[i]:6);
end;
writeln();
for i:=1 to 10 do
write(sqr(a[i]):6);
<span>end.</span>
Может 2278 байтов??? ?
тогда решение будет такое:
Количество символов тексте: N=2i
i-?
I=K×i → i=I/K
I= 2278 (байтов) = 2278×8 =18224(бит)
К (число символов в сообщении) =10×67+2×(29×67) = 670+3886 = 4556 (символов)
i= 18224(бит) / 4556 (символов) = 4 (бит)
<span>N=2 в 4 степени = 16 (символов)</span>
Накипятить воду, положить в чайник заварку 3 ложки, залить кипятком и настоять пока не упадёт на дно заварка
<span>int main()
</span>{
int a[30] = {45, 42, 33, 54, 55, 56, 57, 58, 59, 54, 45, 42, 33, 54, 55, 56, 57, 58, 59, 54, 45, 42, 33, 54, 55, 56, 57, 58, 59, 54};
int n=0;
for (int i=0; i<30; i++)
{
if ((a[i]>50)&&(a[i]<=57)) {n++;}
}
printf("%d "<span>, n); n - количество спортсменок с нужным весом</span>
}