Дано целое число K и набор ненулевых целых чисел.Вывести номер первого числа в наборе, большего K. Если таких чисел в наборе нет, то вывести 0

@svens · Регистрация: 29.11.2012

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

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

Дано целое число K и набор ненулевых целых чисел; признак его завершения — число 0. Вывести номер первого числа в наборе, большего K. Если таких чисел в наборе нет, то вывести 0

@Puporev · 01.12.2012, 09:37

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var i,i1,k,a:integer;
begin
clrscr;
write('Введите целое число k=');
readln(k);
writeln('Введите не менее 1 целого чисела, окончание ввода 0:');
i:=0;
i1:=0;
repeat
i:=i+1;
readln(a);
if(a>k)and(i1=0)then i1:=i;
until a=0;
writeln('Номер первого числа, большего ',k,'=',i1);
readln
end.

@svens · 01.12.2012, 13:54 **[ТС]**

Сообщение от Puporev

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var i,i1,k,a:integer;
begin
clrscr;
write('Введите целое число k=');
readln(k);
writeln('Введите не менее 1 целого чисела, окончание ввода 0:');
i:=0;
i1:=0;
repeat
i:=i+1;
readln(a);
if(a>k)and(i1=0)then i1:=i;
until a=0;
writeln('Номер первого числа, большего ',k,'=',i1);
readln
end.

задача работает, но всегда выводит только 1

@Puporev · 01.12.2012, 14:17

Сообщение от svens

задача работает, но всегда выводит только 1

Не сочиняйте. Введите к=10
и числа 5 6 9 12 16 0
выведет 4.

@svens · 01.12.2012, 14:51 **[ТС]**

Сообщение от Puporev

Не сочиняйте. Введите к=10
и числа 5 6 9 12 16 0
выведет 4.

в задании число должно выводится так:
k=10
вводим набор чисел: 7 12 14 21 0
и должно получится 12, т.к. из ведённого набора чисел, 12 больше числа k

а если бы вели k=10
и набор из 4 6 7 0, то выводить должно 0, т.к. в наборе нету числа большего k

надеюсь вы поняли что надо.

@Puporev · 01.12.2012, 14:57

Сообщение от svens

Вывести номер первого числа в наборе, большего K

Читайте внимательно условие, учитесь программировать, а потом, если Вам позволят, выеживайтесь.

Добавлено через 52 секунды

Сообщение от svens

надеюсь вы поняли что надо.

Только за это мог бы дать по рогам, дерьмо.

Новые блоги и статьи Все статьи Все блоги /
Непрерывная интеграция для пакета Python Mr. Docker 22.06.2025 Было 4 часа утра пятницы, когда я выпустил новую версию нашей внутренней библиотеки для обработки данных. Релиз 0. 5. 2 содержал небольшой фикс для обработки дат в ISO формате, что может пойти не так?. . .	Продвинутый ETL на C# из OLTP БД в хранилище stackOverflow 22.06.2025 Работая в сфере корпоративной аналитики, я постоянно сталкиваюсь с одним и тем же - нужны чистые, структурированные и, главное, свежие данные. Без них современные аналитические системы, машинное. . .	Мастер-класс по микросервисам на Node.js Reangularity 21.06.2025 Node. js стал одной из самых популярных платформ для микросервисной архитектуры не случайно. Его неблокирующая однопоточная модель и событийно-ориентированный подход делают его идеальным для. . .	Управление Arduino из WPF приложения Wired 21.06.2025 Зачем вообще связывать Arduino с WPF-приложением? Казалось бы, у Arduino есть собственная среда разработки, своя экосистема, свои способы управления. Однако при создании серьезных проектов. . .	Звёздная пыль kumehtar 20.06.2025 Я просто это себе представляю: как создавался этот мир. Как энергия слипалась в маленькие частички. Как они собирались в первые звёзды, как во вселенной впервые появился Свет. Как эти звёзды. . .
Создание нейросети с PyTorch AI_Generated 19.06.2025 Ключевое преимущество PyTorch — его питоновская натура. В отличие от TensorFlow, который изначально был построен как статический вычислительный граф, PyTorch предлагает динамический подход. Это. . .	JWT аутентификация в ASP.NET Core UnmanagedCoder 18.06.2025 Разрабатывая веб-приложения, я постоянно сталкиваюсь с дилеммой: как обеспечить надежную аутентификацию пользователей без ущерба для производительности и масштабируемости? Классические подходы на. . .	Краткий курс по С# aaLeXAA 18.06.2025 Здесь вы найдете все необходимые функции чтоб написать програму на C# Задание 1: КЛАСС FORM 1 public partial class Form1 : Form { Spisok listin = new Spisok(); . . .	50 самых полезных примеров кода Python для частых задач py-thonny 17.06.2025 Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .	C# и продвинутые приемы работы с БД stackOverflow 17.06.2025 Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .

@svens 0 / 0 / 0 Регистрация: 29.11.2012 Сообщений: 7

	Дано целое число K и набор ненулевых целых чисел.Вывести номер первого числа в наборе, большего K. Если таких чисел в наборе нет, то вывести 0 30.11.2012, 23:15. Показов 4485. Ответов 5 Метки нет (Все метки) Реализовать данные задания с помощью циклов с предусловием или циклов с постусловием. Во всех заданиях второго пункта предполагается, что исходный набор содержит ненулевое число элементов (в частности, число N всегда больше нуля). Дано целое число K и набор ненулевых целых чисел; признак его завершения — число 0. Вывести номер первого числа в наборе, большего K. Если таких чисел в наборе нет, то вывести 0 0

Опции темы