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

Сгенерировать массив и n различных случайных чисел. найти сумму ее членов расположенных между максимальным и минимальным значениями (в сумму включить и оба этих числа) через динамический массив. pascal abc.net

👇
Ответ:
nicesasha2017
nicesasha2017
10.03.2023
Программа во вложении:
4,8(78 оценок)
Открыть все ответы
Ответ:
BlackStar14
BlackStar14
10.03.2023
Const
 n = 20;

var
 pos,neg: integer;
 i,k,x: integer;
 ev,un: integer;
 a,b: array [1..n] of integer;

begin
 for i := 1 to n do
   read(a[i]);
  k := 0;
 pos := 0;
 neg := 0;
  for i := 1 to n do
   begin
      ev := 0;
   un := 0;
      x := a[i];
      if x <> 0 then
     if x > 0 then
       if (x < pos) or (pos = 0) then
         pos := x
       else
     else
       if (x > neg) or (neg = 0) then
         neg := x;
      x := abs(x);
      while x <> 0 do
     begin
     if odd(x) then
       un := un + 1
     else
       ev := ev + 1;
     x := x div 10
     end;
      if un = ev then
     begin
     k := k + 1;
     b[k] := a[i]
     end
      end;

 writeln(pos,' ',neg);
 for i := 1 to k do
   write(b[i],' ')
 end.
4,5(1 оценок)
Ответ:
Fivesecond
Fivesecond
10.03.2023

1) Компьютер может служить как библиотекарь - он хранит всю информацию которую ты сохранил в нем.

2)Компьютер может и производить вычисления, обработку числового материала.

3)В компьютере ты можешь писать книги, рассказы, информацию и многое другое.

4)Компьютер  заменяет и делопроизводителя.

5)Компьютер - так же и неплохой личный секретарь и день распланировать и многое другое.

6)Компьютер - отличный бугхалтер, вычислит все что надо и нужно.

7)в справочном бюро и расписание рейсов узнаешь.

9) в компьютере можно и слова переводить.

10) компьютер передаст все письма от твоих друзей. знакомых и родственников. Хороший почтальон.

11) на компьютере делают красивейшие рисунки и арты.

13) в компьютере можно создавать анимации и многое другое. Вообщем конструктор.

14) в компьютере ты можешь создать эскизы новой одежды, аксессуаров.

15) Также в компьюетере можно создавать эскизы новых зданий.

16)  в компьютере можно создавать дизайн одежды, домов, дизайн комнат.

17) на компьютере производят очень красивую музыку.

18) В компьютере можно узнать признаки разных болезней.

19) в компьютере ты можешь учиться и узнавать многое.

20) А сколько игр можно скачать на компьютор, кие только тебе по душе и по вкусу.

Некоторые профессии я не написала ибо не смогла придумать что написать, или от непонимания обязонностей профессии.

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