В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
ivanivanov2007r
ivanivanov2007r
19.04.2022 15:04 •  Информатика

Sos нужно сделать блок-схему и по ней программу в паскале

Показать ответ
Ответ:
mirnayanatulya
mirnayanatulya
25.11.2021 18:40
Сначала спрашивайте у пользователя число n, потом заполняйте массив (с проверкой на [-100..100]), потом в цикле проверяйте каждый элемент массива на кратность 5. Параллельно с проверкой на кратность (в том же цикле) кидайте первое кратное число в переменную max, и сравнивайте с это переменной другие числа, кратные 5. Если больше - перезаписываете значение max

Цикл: (counter - счетчик, n - колво чисел в массиве)

max := 0;
for counter = 1 To n Do
if (Massive[counter] mod 5) = 0 then
        if Massive[counter] > max then max := Massive[counter];

В конце выводите max
0,0(0 оценок)
Ответ:
Mitrel
Mitrel
24.04.2023 15:12
Насколько я помню,операторы div и mod - операторы деления.mod - возвращает остаток от деления,а div - наоборот,целую часть.Алгоритм прост в данном случае:
Пусть число abcd - заданное пользователем число.Тогда первая цифра будет равна : a = abcd div 1000 //a - число тысяч
Вторая : b = (abcd - (a*1000)) div 100 //b - число сотен
Третья : c = (abcd - (a*1000 + b*100)) div 10 // c - число десятков
Четвертая : d = abcd mod 10 // d - остаток от деления,в данном случае число единиц.
Остается только вывести a,b,c и d через пробел на экран.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота