В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
ольга1723
ольга1723
21.04.2022 09:02 •  Информатика

Язык C++ Написать программу:
Два квадрата двигаются в противоположных направлениях и отталкиваются от стенок


Язык C++ Написать программу: Два квадрата двигаются в противоположных направлениях и отталкиваются о

Показать ответ
Ответ:
Astr4lis
Astr4lis
20.02.2021 04:08
940x1024=962560 байт
или 962560 байт = 7700480 бит  (весь файл) или = 770048 бит/сек.
поскольку качество звука определяется не только частотой дискретизации, но и размерностью квантования (разрядностью по амплитуде), однозначного ответа к этой задаче быть не может, так как ни дискретизация, ни глубина квантования в задаче не определена.
Например 1)при частоте дискретизации 10кГц разрядность одногоканального звука равна 7700480/10000=770 уровней амплитуды, или 10 бит (2^10=1024) 512<770<1024 или
2) при глубине квантования 256 (2^8=1 байт) частота  дискретизации составляет: 770048/8=96256 Гц
к данной задаче можно сказать, что качество звука равно 770048бит/сек
0,0(0 оценок)
Ответ:
Annpetushok
Annpetushok
13.02.2021 19:56
Function NOK(a, b: integer): integer;
var
  c, d, e: integer;
begin
    c := a;
    d := b;
    while (d > 0) do
    begin
      c := c mod d;
      e := c;
      c := d;
      d := e;
    end;
    result := (a div c) * b;
end;

const
  n = 4;

var
  a: array [1..n] of integer;
  b: array [1..n*n] of integer;
  i, j, min_: integer;

begin
  writeln('Введите n целых чисел, только вот давайте без нулей, детсадовцы знают, что на 0 делить нельзя, плохо это');
  min_ := 2147483647;
  for i := 1 to n do
    readln(a[i]);
  for i := 1 to n do
    for j := 1 to n do
    begin
      if (i = j) then continue;
      b[i + n * (j - 1)] := nok(a[i], a[j]);
      min_ := min(b[i + n * (j - 1)], min_);
    end;
  write('     ');
  for i := 1 to n do
    write(i:5);
  writeln();
  for i := 1 to n do
  begin
    write(i:5);
    for j := 1 to n do
      write(b[i + n * (j - 1)]:5);
    writeln();
  end;
  writeln('min: ', min_);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота