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

На паскаль: в одномерном массиве а(10) определить сумму и количество элементов,которые меньше 5.

👇
Ответ:
Adele04
Adele04
15.08.2021
Const
  n=10;
var
  a:array[1..n] of integer;
  i,s,k:integer;
begin
  Randomize;
  Writeln('Исходный массив');
  s:=0; k:=0;
  for i:=1 to n do begin
    a[i]:=Random(31)-10;
    Write(a[i]:4);
    if a[i]<5 then begin Inc(k); s:=s+a[i] end
    end;
  Writeln;
  Writeln('Элементов, меньших 5: ',k,', их сумма равна ',s)
end.

Пример
Исходный массив
  18  18   9  -7   2 -10   9  16  11  -7
Элементов, меньших 5: 4, их сумма равна -22
4,5(22 оценок)
Открыть все ответы
Ответ:
makeevaed
makeevaed
15.08.2021

ответ:Опти́ческий диск (англ. optical disc, в народе - круги, блины) — собирательное название для носителей информации, выполненных в виде дисков, чтение с которых ведётся с оптического (лазерного) излучения. Диск обычно плоский, его основа сделана из поликарбоната, на который нанесён специальный слой, который и служит для хранения информации. Для считывания информации используется обычно луч лазера, который направляется на специальный слой и отражается от него. При отражении луч модулируется мельчайшими выемками — «питами» (от англ. pit — «ямка», «углубление») на специальном слое, на основании декодирования этих изменений устройством чтения восстанавливается записанная на диск информация.

Объяснение:

4,8(71 оценок)
Ответ:
lox54
lox54
15.08.2021

Объяснение:

#include <iostream>

unsigned perfectSquareLessOrEqual(unsigned n) {

unsigned sum = 0;

for (unsigned i = 1; (sum + i) <= n; i += 2)

sum += i;

return sum;

}

int main() {

unsigned x, y;

std::cin >> x >> y;

const unsigned a = perfectSquareLessOrEqual(x) + perfectSquareLessOrEqual(y);

const unsigned b = perfectSquareLessOrEqual(x + y);

if (a < b)

std::cout << "Petya gives paint to Vasya";

else if (a > b)

std::cout << "Petya leaves paint to himself";

else

std::cout << "Equal";

return 0;

}

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