JetMinegrifer
30.04.2020 14:04

5. Составьте программу вычисления и вывода на экран степеней числа А с натуральным
показателем от 1 до n т.е. А^1, А^2, А^3,..., А^N".
В quick basic

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Алая5кровь
18.04.2020 12:38
1. Определим размер файла, содержащего 1с записи.
Частота дискретизации по времени 16 кГц означает, что за 1с снимаются 16000 отсчетов громкости в каждом канале, а всего 4×16000=64000 отсчетов..
Частота дискретизации по уровню громкости (разрешение) составляет 32 бита или 32/8=4 байта и поэтому файл запись потребует для хранения одной секунды 64000×8=512000 байт = 512000/1024 = 500 Кбайт.
2. Найдем время записи
60 Мбайт = 60×1024 = 61440 Кбайт - общий объем файла
61440/500 = 122.88 с = 2 мин 2.88 с

ответ: а) 2 мин.
0,0(0 оценок)
Ответ:
maksimkakravchenko
24.09.2020 21:06
//Не смотрел Ваш код, просто моё видение решения задачи
//PascalABC.NET 3.2 сборка 1318

Var
  t:text;
  x,y,i,j:integer;
  s:string;
  c:char;
  world:array[1..4] of char=('E','S','W','N');
begin
j:=1;
c:='E';
assign(t,'input.txt');
reset(t);
read(t,s);
close(t);
i:=1;
while s[i]<>'S' do
 begin
  if s[i]='R' then
    begin
      if c='N' then j:=1 else inc(j);
      c:=world[j];
    end;
  if s[i]='L' then
    begin
      if c='E' then j:=4 else dec(j);
      c:=world[j];
    end;
  if s[i]='F' then
    case c of
      'E':inc(x);
      'S':dec(y);
      'W':dec(x);
      'N':inc(y);
    end;
  inc(i);
  end;
assign(t,'output.txt');
rewrite(t);
write(t,x,' ',y);
close(t);
end.

Пример содержимого input.txt:
FLFS
Пример содержимого output.txt:
1 1
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота