Вывести на экран номер наименьшего положительного числа

@44456 · Регистрация: 02.03.2020

Author24 — интернет-сервис помощи студентам

Вывести на экран номер наименьшего положительного числа
Считать, что все элементы последовательности лежат в диапазоне -100...+100.
Вывести на экран номер наименьшего положительного числа.
Если таких чисел несколько -- вывести наибольший номер.
Если положительных чисел нет -- вывести об этом сообщение ("NO").

@Cyborg Drone · 17.11.2020, 00:27

Pascal    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var
  n, m, im, x: integer;
begin
  readln(n);
  m := 101;
  im := 0;
  for n := 1 to n do
    begin
      read(x);
      if (x > 0) and (x <= m) then
        begin
          m := x;
          im := n
        end
    end;
  readln;
  if im > 0 then writeln(im) else writeln('NO');
  readln
end.

Новые блоги и статьи Все статьи Все блоги /
TypeScript: Интерфейсы vs Типы run.dev 11.04.2025 Современная разработка на JavaScript сталкивается с множеством проблем при масштабировании проектов. Типизация кода стала хорошим инструментом, помогающим избежать ошибок во время выполнения,. . .	Управление топиками и разделами Kafka Javaican 11.04.2025 Apache Kafka — распределенная платформа потоковой передачи данных, которая стала стандартом для построения высоконагруженных систем обмена сообщениями. В современной архитектуре микросервисов,. . .	Миграция монолита в Event-Driven микросервисную архитектуру на C# stackOverflow 11.04.2025 Монолитная архитектура – классический подход к разработке программного обеспечения. Это приложение, построенное как единое целое, где все компоненты тесно связаны между собой. Большинство проектов. . .	Go в Kubernetes: Управление ресурсами golander 11.04.2025 Разработчики Go-приложений в Kubernetes часто сталкиваются с неожиданными проблемами производительности и даже внезапными отказами контейнеров. Причина этого кроется в особенностях взаимодействия. . .	Агрегаты и сущности в DDD микросервисах Javaican 10.04.2025 Разработка современных программных систем часто приводит на распутье: монолит или микросервисы? Даже при выборе микросервисной архитектуры многие команды сталкиваются с проблемой правильного. . .
Многопоточность в C#: Task и параллельное программирование UnmanagedCoder 10.04.2025 Современные процессоры уже давно перестали наращивать тактовую частоту в пользу увеличения количества ядер. Это создало интересную ситуацию: разработчики, привыкшие к последовательному. . .	Линейное решение нелинейной задачи с помощью арктангенса для метода обработки данных из double buffering. Hrethgir 10.04.2025 Публикация в доработке, метод арктангенса в комментариях внизу. Вообще изначально я пренебрёг квадратурой числа, но потом понял, что для вычисления приблизительного значения - сгодится, формулу. . .	Переменные в Python py-thonny 10.04.2025 Переменная в программировании — это символическое имя, связанное с областью памяти, в которой хранится значение. Она позволяет получать доступ к данным через понятные человеку идентификаторы, а не. . .	Многопоточность в C#: Task и асинхронные операции UnmanagedCoder 10.04.2025 Многопоточность позволяет выполнять несколько операций одновременно, что важно для решения двух основных задач: повышения скорости выполнения вычислительно-сложных операций и сохранения отзывчивости. . .	Запуск контейнеров Docker на ARM64 Mr. Docker 09.04.2025 Появление таких решений, как Apple M1/ M2, AWS Graviton, Ampere Altra и Raspberry Pi, сделало использование ARM-систем обыденностью для многих разработчиков и DevOps-инженеров. При этом Docker,. . .

@44456 1 / 1 / 0 Регистрация: 02.03.2020 Сообщений: 54

	Вывести на экран номер наименьшего положительного числа 16.11.2020, 22:58. Показов 740. Ответов 1 Метки нет (Все метки) Вывести на экран номер наименьшего положительного числа Считать, что все элементы последовательности лежат в диапазоне -100...+100. Вывести на экран номер наименьшего положительного числа. Если таких чисел несколько -- вывести наибольший номер. Если положительных чисел нет -- вывести об этом сообщение ("NO"). 0