Александра440
?>

Дискета имеет размер 1467668 байта поместится ли на ней рисунок размером 800 на 600 пикселей с глубиной кодирования цвета 4 бита

Информатика

Ответы

Аношкина1696
#include <iostream>
#include <iomanip>
using namespace std;

int main() {
      int n;
      cout<<"n = ";  cin>>n;   // ввод количества элементов массива 
      int a[n];
// заполнение массива и вывод на экран
      for (int i=0;i<n;i++) { 
           a[i]=rand()%15;     cout<<a[i]<<" "; 
      } 
      cout<<endl;  // перевод строки
// сортировка массива по возрастанию
      for (int i=0; i<n-1; i++)
      for (int j=i+1; j<n; j++) 
           if (a[i]>a[j]) swap(a[i],a[j]);
// вывод 4 минимальных
      cout<<"four min numbers:  ";
      for (int i=0; i<4; i++)  cout<<a[i]<<" ";
      cout<<endl;
      system("pause");  // ожидание ввода с клавиатуры
      return 0;
  }
JisesLove19955
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadArrInteger(10);
  Write('Массив A: '); a.Println;
  var s:=a.Where(t->t<0); // последовательность не хранится
  var an:=s.Average;
  Writeln('Отрицательных элементов: ',s.Count,', среднее= ', an);
  var b:=a.Select(t->t<0?an:t).ToArray;
  Write('Массив В: '); b.Println
end.

Пример
49 -5 21 10 22 -23 3 35 -26 -43
Отрицательных элементов: 4, среднее= -24.25
Массив В: 49 -24.25 21 10 22 -24.25 3 35 -24.25 -24.25

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дискета имеет размер 1467668 байта поместится ли на ней рисунок размером 800 на 600 пикселей с глубиной кодирования цвета 4 бита
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Марюк-Мубариз
orange-salon-job77
ЕлизаветаВладимирович
Внести недостающие записи в схему​
Galinova2911
Lvova_Aleksandr933
panstel
volna22051964
Korobeinikov-Yulich23
Максим
gardenstreet5
dinadumno2114
dima-a
iqtoy2010
Aleksandrova Zhanna1250
Чунихина1586