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

Составить программу в которой записать в массив n номера положительных элементов массива (x1,)

👇
Ответ:
coolflex
coolflex
08.10.2022

var

  N: array [1..15] of 1..15; {Массив, в который записываются номера положительных элементов массива х}

  x: array [1..15] of real; //Массив х

  i: integer; //Переменная для цикла

  Number: integer; //Сколько номеров было записано

begin

  Number:= 0; //Обнуляем счетчик номеров

  for i:= 1 to 15 do   //Вводим с клавиатуры массив х

  begin

    writeln('Введите ', i, ' элемент массива х');

    readln(x[i]);

    if x[i] > 0 then  {Если введенный элемент массива х положительный, то прибавляем к счетчику добавленных номеров 1 и присваиваем соответствующему элементу массива N номер элемента}

    begin

      Number:= Number + 1;

      N[Number]:= i;

    end;

  end;

  write('Номера положительных элементов массива х:  ');

  for i:= 1 to Number do write(n[i], '  '); //Выводим записанные номера элементов

  writeln; {Переход на новую строку, чтобы при следующем запуске программы информация выводилась с новой строки}

end.

 

4,7(72 оценок)
Открыть все ответы
Ответ:
elinapak
elinapak
08.10.2022

Условие пытается немного обмануть решающего. На самом деле всегда можно выбрать Рахманов ломтик строки, состоящий из одного символа (действительно, если в искомой подстроке несколько символов, то каждый из них встречается не меньшее число раз, что и сама подстрока). В итоге задача превращается в тривиальную: считать строку и вывести символ, встречающийся максимальное число раз.


#include <iostream>



int main() {


   char c, maxchar;


   int count[26] = {0}, maxcount = 0;


   while (std::cin.get(c)) {


       count[c - 'a']++;


   }


   for (c = 0; c < 26; c++) {


       if (count[c] > maxcount) {


           maxcount = count[c];


           maxchar = c;


       }


   }


   std::cout << static_cast<char>(maxchar + 'a');


   return 0;


}


Подробнее - на -

4,5(3 оценок)
Ответ:
ekaterinabajewa
ekaterinabajewa
08.10.2022
Код

var
    x, y, z, a, b, c, d, t: integer ;

begin
    x := 336;
    y := 8;
    x := x div y;
    y := x mod y;
    writeln('x = ', x, ', y = ', y);
   
    a := 1686;
    b := (a div 10) mod 5;
    a := a - 200 * b;
    writeln('a = ', a, ', b = ', b);
   
    x := 11;
    y := 5;
    t := y;
    y := x mod y;
    x := t;
    y := y + 2 * t;
    writeln('x = ', x, ', y = ', y, ', t = ', t);
   
    x := 19;
    y := 3;
    z := y * 2;
    y := x mod y;
    x := x - z;
    y := y + z;
    writeln('x = ', x, ', y = ', y, ', z = ', z);
   
    x := 13;
    y := 3;
    z := x;
    x := z div y;
    y := x;
    writeln('x = ', x, ', y = ', y, ', z = ', z);
end.

Вывод и ответы по очереди

1) x = 42, y = 2
2) a = 1086, b = 3
3) x = 5, y = 11, t = 5
4) x = 13, y = 7, z = 6
5) x = 4, y = 4, z = 13
4,6(59 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ