Напишите программку которая последовасти естественных чисел обретает номер заключительного элемента

Напишите программку которая последовасти натуральных чисел находит номер заключительного элемента заканчивающиеся на цифру 8. Если в последовательности нет таких частей, то ввести извещенье NO. Последовать формируется в программке средством генерации случайных чисел. Элементы последовательности принимают значения от 0 до 30000. Количество чисел 100

Задать свой вопрос
Тимур Химатуллин
У частей последовательности нет номеров.
Борька Пицаков
Номера есть у элементов массива.
Алла
Но, можно сказать о том, каким по порядку рассматривается элемент последовательности.
1 ответ

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 var (i, m):=(1, 0);

 SeqRandom(100, 0, 30000)

     .Foreach(t -gt;

     begin

       if t mod 10 = 8 then m := i;

       Inc(i);

       t.Print

     end);

 Println;

 Println;

 if m = 0 then Print('NO')

 else m.Print

end.

Danil Vorovickij
Такая реализация в PascalABC.NET. Вместо последовательности хранится порождающая ее функция, которая при следующем воззвании генерирует и отдаёт один элемент. Вот он только (и сама функция) память занимают. В С это же делает yield. Фактически, в PascalABC.NET это тоже делает yield.
Алла Трибельгорн
PascalABC.NET - это совершенно не тот Паскаль, который выдумал Н.Вирт, не тот, что в 1984 году появился под именем Turbo Pascal и даже не тот Object Pascal, что в 1994 году появился в составе BorlandDelphi. Это язык более нового поколения, таковой же, как Питон или .NET языки. Разработчики не стали писать очередной Питон, а использовали все хорошее, что было в Object Pascal и расширили язык, оснастив его всеми современными возможностями.
Lazarchenko Regina
В итоге получился немножко уcеченный C, зато дополненный вкусняшками из Питона и Haskell, что делает обучение программированию на нем обычным и хорошо понятным даже в школе.
Вовка Скорбящев
Плюс лаконичность кода, ускоряющая разработку программы. И полноценный компилятор, порождающий самостоятельные выполняемые файлы.
Андрюха
Выходит, она подходит только для моментального использования?
Леха Покорный
То есть нельзя создать последовательность, вывести её на экран, потом отсортировать её и опять вывести на экран
Тимур Тумашик
Не совершенно так. Если есть формула для получения членов последовательности, она будет генерироваться сколько угодно раз, но каждый раз просматриваться от начала. Такие последовательности величаются в теории немутирующими. Если же последовательность мутирующая, то или метод обязан быть однопроходным, либо ее нужно сохранить в массив. К примеру, ка в случае использования датчика случайных чисел либо клавиатурного ввода.
Олег Касамаков
С мутирующими последовательностями поступают так к примеру, как вот я поступил в своем решении.
Николай Подчешинский
Понятно, спасибо)
Jevelina Gidachjan
Пожалуйста
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы
задание экономиоти Рассмотри ситуацию: человек живёт на Крайнем Се-вере. С помощью каких

Экономика.

Человек живет на Крайнем Севере. С помощью каких благ удовлетворяются потребности

Экономика.

там лежат три яйца.у дома рос клен.Это гнездо сойки.на клёне гнездо

Русский язык.

Тыныштық күйіндегі карусель 35 с-та 3,0 рад/с бұрыштық жылдамдықпен үдей қозғалады.

Разные вопросы.

Сочинение на тему "Русский язык не сможет умереть!"

Математика.

Приветствую! Меня зовут Станислав, я представляю компанию under.site. Хотел бы предложить интересное решение

Разные вопросы.

Масса трёх одинаковых пакетов чая 180г чему равна масса

Математика.

Газообразный аммиак объёмом 2.24 л (н.у.) был полностью поглощён 14.68 мл

Химия.

Упражнение 2 Выпишите глаголы и вставьте пропущенные буквы

Русский язык.

Радиус окружности, описанной около равностороннего треугольника, равен 6. Найдите сторону треугольника

Геометрия.

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт