М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
akarapiria4
akarapiria4
15.10.2020 03:31 •  Информатика

Составить блок-схему и программу на языке паскаль для вычисления объема конуса с радиусом основания r=5 см и высотой h=10 см. v=(1/3)sосн*h

👇
Ответ:
Verra990
Verra990
15.10.2020
Var r,h,p,V:double;
Begin
r:=5;
h:=10;
p:=3.14;
V:=(1/3)*p*r*r*h;
writeln(V);
end.
4,4(23 оценок)
Ответ:
bulyginanastya
bulyginanastya
15.10.2020
Ещё добавлю блок-схему )
Составить блок-схему и программу на языке паскаль для вычисления объема конуса с радиусом основания
4,8(43 оценок)
Открыть все ответы
Ответ:
Katerina9322
Katerina9322
15.10.2020
Сначала выведем нужную формулу.а) Определим объем памяти, необходимый для хранения 1с звучания.Частота дискретизации 44,1 кГц означает, что за 1с делается 44100 отсчетов (измерений) уровня звукового сигнала. Глубина кодирования 24 бита = 24/8 = 3 байта означает, что для хранения одного отсчета в одном канале потребуется 3 байта. В режиме стерео используется два канала, поэтому количество байт, необходимое для одного отсчета составит 2×3=6 байт. Тогда для 1с звучания потребуется 44100×6 = 264600 байт.

Предлагается следующий алгоритм.
1. Ввести время записи в минутах n.
2. Перевести минуты в секунды, умножив n на 60.
3. Получить размер файла в байтах, умножив результат (2) на 264600.
4. Перевести результат в мегабайты, поделив результат (3) на 1024².
5. Округлить результат (4) до целых в большую сторону.
6. Вывести значение, полученное в (5)

Конечная формула:

\displaystyle v= \left\lceil \frac{264600\cdot60}{1024^2}\cdot n\right\rceil

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadReal('Введите время записи в минутах');
  var v:=Ceil(264600*60*n/1024/1024); // округление "вверх"
  Writeln('Размер файла ',v,' Мбайт')
end.

Паскаль оцифровка звука выполняется в режиме стерео с частотой дискретизации 44,1 кгц и глубиной код
4,7(24 оценок)
Ответ:

#include <iostream>

#include <cstdlib>

#include <ctime>

#include <vector>

using namespace std;

int main()

{

int i, j, sum=0, n, m, p=1;

cout<<"Введите количество строк:"<<endl;

cin >> n;

cout<<"Введите количество столбцов:"<<endl;

cin >> m;

 int k=i, h=j;

int a[n][m];

int max = a[0][0];

cout<<"Исходный массив:"<<endl;

for (i=0; i<n;i++)

 {

   for (j=0;j<m;j++)

     {

         a[i][j]=-10 + rand()%20;

         cout<<a[i][j]<<" ";

     }

   cout<<endl;

 }

for (i = 0; i < n; i++)

{

 {

   for (j = 0; j < m; j++)

     {

      sum += a[i][j];    

     }

       cout<<"Сумма "<<i<<" строки равна: "<<sum<<endl;

       sum = 0;

  }

 }    

for (j = 0; j < m; j++)

{

 for (i = 0; i < n; i++)

   {

     p *= a[i][j];  

   }

      cout<<"Произведение "<<j<<" столбца равно: "<<p<<endl;

      p = 1;    

 }

for(k=0, h=0; k<n && h<m; k++, h++)

{

 if(a[k][h]>max)

   {

     max = a[k][h];

   }

}

 cout<<"Наибольшее число на главной диагонали: "<<max<<endl;

4,4(44 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ