Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
МаксимГерасименкоВла
04.05.2020 17:41 •
Информатика
Составить алгоритм нахождения позиции последнего положительного элемента x1,
Показать ответ
Ответ:
Ariunkh
10.08.2020 19:57
Алгоритм же элементарный: тупо перебираешь массив с конца, проверяя знак каждого элемента. Вот код:
ОТДЕЛ Задание+;
ПЕР
x: РЯД 100 ИЗ ЦЕЛ;
сч, послПолож: ЦЕЛ;
УКАЗ
послПолож := -1;
сч := РАЗМЕР(x) - 1;
ПОВТОРЯТЬ
ЕСЛИ x[сч] > 0 ТО послПолож := сч КОН;
УМЕНЬШИТЬ(сч)
ДО послПолож # -1 ИЛИ сч < 0
КОН Задание.
0,0
(0 оценок)
Популярные вопросы: Информатика
Amrlololoshka
12.02.2020 13:44
Доступ к файлу slon.txt, находящемуся на сервере circ.org, осуществляется по протоколу http. фрагменты адреса файла закодированы буквами от а до ж. запишите последовательность...
Flaen1
19.02.2020 06:53
Превращение значения строчного типа в значение действительного типа в среде программирования lazarus осуществляется с функции 1) strtoint 2) inttostr 3) strtofloat 4) floattostr...
tainyanonimusp08coh
29.10.2020 16:42
Дан ряд из 15 чисел. найти среднее арифметическое всех нечетных чисел и вывести. паскаль...
Masha45322
23.04.2020 19:57
З переліку назв різних моделей виділіть інформаційні лялькам ячіграшковий автомобільформулинотирозклад руху потягів схема руху потягів метрополітенуплан евакуації школизбірка...
pozdniakova1998
12.11.2021 15:03
Дана кодовая таблица. Расшифруйте следующие записи....
Kristina122205
07.04.2021 15:05
Укажите ложные высказывания. Цифры и знаки препинания в кодовых таблицах КОИ-8 и Windows имеют различные коды. Латинские буквы в кодовых таблицах КОИ-8 и Windows расположены...
maks2324
26.03.2023 18:11
Изменяется ли число строк при сортировке...
1i1kuz
24.04.2023 04:38
Як помер соловей з билинни Ілля Муромець і соловей...
MeowCatNya
24.04.2023 04:38
найти ответ, а то меня математичка сожрет. ...
s0f21
10.12.2022 18:01
Түрік қолбасшысы қаи қытаи патшалығымен бірлесіп жужандарды женді...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
ОТДЕЛ Задание+;
ПЕР
x: РЯД 100 ИЗ ЦЕЛ;
сч, послПолож: ЦЕЛ;
УКАЗ
послПолож := -1;
сч := РАЗМЕР(x) - 1;
ПОВТОРЯТЬ
ЕСЛИ x[сч] > 0 ТО послПолож := сч КОН;
УМЕНЬШИТЬ(сч)
ДО послПолож # -1 ИЛИ сч < 0
КОН Задание.