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

Подготовить решение в виде блок-схемы : дан одномерный массив а из 20-ти элементов. найти произведение отрицательных элементов.

Показать ответ
Ответ:
polinabaryshni
polinabaryshni
06.11.2022 20:59
Имя файла - Название
Файл - Книга
Вложенная папка - Полка
Папка - Шкаф
Диск - Библиотека

Объяснение:
Все очень ассоциативно. Файлы содержат в себе информацию, как и книги, которые вы можете найти на полке в шкафу. Только вот файлы вы ищете в папках и во вложенных папках (вложенная — то есть папка сама лежит в папке). Файлы вам доступны по имени файла, точно также как и доступна вам книга по ее названию, когда вы ее покупаете или приходите в библиотеку. Библиотека, в таком случае, — это аналогия жесткому диску, на котором содержится вся информация компьютера (все папки, вложенные в них папки, и файлы лежащие в этих папках)
0,0(0 оценок)
Ответ:
kiyash98
kiyash98
17.10.2022 20:08

program z1;

var n,k:integer;

begin

k:=0;

write ('Введите натуральное число (n>9): ');

readln (n);

write ('Цифры натурального числа ',n);

while n>=10 do

begin

if n mod 10 < n div 10 mod 10 then k:=1;

n:=n div 10

end;

if k=1 then write (' НЕ расположены в порядке возрастания')

else write (' расположены в порядке возрастания')

end.

Объяснение:

Вводим число

Цикл с предусловием (условие число больше или равно 10)

Сравнение последней и предпоследней цифр числа, если последняя меньше, то k присваивается значение 1

n присваивается значение целочисленного деления на 10 (отбрасываем последнюю цифру числа)

Если k = 1, то цифры не расположены в порядке возрастания, иначе расположены

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота