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

Задание №1
Одномерный массив на 10 элементов формируется через Random(50). Распечатать массив.
Вычислить средне-арифметическое элементов массива, которые попадают в интервал от 20 до 30.

Задание №2
Одномерный массив на 20 элементов формируется через Random(10). Распечатать массив.
Подсчитать количество элементов массива, значения которых совпадает с их номером (индексом).

👇
Открыть все ответы
Ответ:
kelyansky
kelyansky
18.02.2022

const

a : array[1..10] of integer = (12, 5, 4, 1, 9, 7, 8, 2, 3, 2);

var k, _counterW, _counterS: integer;

begin

_counterS := 0;

_counterW := 0;

for k := 1 to 10 do

   begin

   if (a[k] = 12) or (a[k] = 1) or (a[k] = 2) then

       _counterW := _counterW + 1

   else if (a[k] = 6) or (a[k] = 7) or (a[k] = 8) then

       _counterS := _counterS + 1;

   end;

writeln('Количество родившихся летом:', _counterS);

writeln('Количество родившихся зимой:',_counterW);

if _counterW > _counterS then

   writeln('Зимой родилось большее количество учащихся!')

else if _counterS > _counterW then

   writeln('Летом родилось большее количество учащихся!')

else

   writeln('Летом и зимой родилось одинаковое число учащихся!');

end.

4,4(3 оценок)
Ответ:
salsavip333
salsavip333
18.02.2022

1.    Он американский ученый, основоположник кибернетики. А также теории об искусственном интеллекте. Славу ему принесли его работы в математике и физике. Его большая роль в том, что именно он впервые смог понять огромное значение того, что информация будет использоваться в процессах управления.

2.       Основатель теории информации, которая нашла свое место в современных системах связи. В 40-х годах века ввел понятие «бит».

3.       Термин, который означает «выполняющееся действие по запросу», ввел Тед Нельсон в веке, в 1963 году.

4.       В 1989 году. Изобретателем считают двух человек – Тима Бернерс-Ли и Роберт Кайо.

5.       Эйлер, в честь которого назвали графическую схему, был ученым. Его сферой изучения была математика, физика, астрономия, химия, ботаника, музыка, медицина и другие направления. Он автор 600 трудов.

Объяснение:

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