простые сложные состав количество посылок характер логического следования
1 Кб=1024 байт , 1 байт=8 бит, умножаем 1024*8 и получим 1 Кб
1 Кб=8192 бит
Ответ будет 15
если f больше d то х:=7 если не больше, тогда 15
Program имя;
Begin
Writeln(' * * * * *'');
Writeln(' * *');
Writeln(' ********');
end.
Var n, i: integer;
a, y: real;
begin
readln(a, n);
for i := 0 to n do
y := y + exp(ln(a) * I);
writeln(y);
end.
<span>
Работает =)</span>