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

какой объём видеопамяти необходим для хранения 6 страниц изображения , если битовая глубина равна 42, а разрешающая дисплея- 1280х 1024 пикселей?

👇
Открыть все ответы
Ответ:
Адай111111
Адай111111
10.08.2020

#include <iostream>

#include <vector>

#include <iterator>

#include <algorithm>

#include <cmath>


int main()

{

int

 sum(0), count(0),

 A, B;

std::cin >> A >> B;

std::vector<int> vec;

std::copy(std::istream_iterator<int>(std::cin), std::istream_iterator<int>(), std::back_inserter(vec));

 

for(auto it = vec.begin(); it != vec.end(); it++)

{

 if(A < *it && B > *it && (std::distance(vec.begin(), it) % 4) == 0)

  sum += pow(*it, 2);

}

std::cout << "Количество нулей: " << std::count(vec.begin(), vec.end(), 0) << std::endl;

std::cout << "Сумма квадратов чисел: " << sum << std::endl;

}


Найдите количество нулей во всем массиве и определите сумму квадратов чисел, принадлежащих промежутк
4,8(32 оценок)
Ответ:
diamond31
diamond31
10.08.2020

var

A: array [1..100, 1..100] of integer;

i, j, n, y, mini, minj, maxi, maxj, temp: integer;

const

format = 4;

begin

Randomize;

writeln('Введите колличество строк и столбцов через пробел (пример: 3 4)');

read(n, y);

writeln('Исходный массив');

for i := 1 to n do

begin

for j := 1 to y do

begin

A[i, j] := random(40) - 20;

write(A[i, j] : format);

end;

writeln;

end;

mini := 1;

minj := 1;

maxi := 1;

maxj := 1;

for i := 1 to n do

for j := 1 to y do

begin

if A[i, j] < A[mini, minj] then

begin

mini := i;

minj := j;

end ;

if A[i, j] > A[maxi, maxj] then

begin

maxi := i;

maxj := j;

end ;

end;

writeln;

WriteLn('Минимальный = ', A[mini, minj], ' в ', mini, ' строке ', minj, ' колоне.');

WriteLn('Максимальный = ', A[maxi, maxj], ' в ', maxi, ' строке ', maxj, ' колоне.');

temp := A[maxi, maxj];

A[maxi, maxj] := A[mini, minj];

A[mini, minj] := temp;

writeln;

writeln('Преобразованный массив');

for i := 1 to n do

begin

for j := 1 to y do

write(A[i, j] : format);

writeln;

end;

readln;

end.


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