Условие Дано число n и последовательность a1, - id42815331 от dionakavinep08o5z 14.09.2021 14:30

Question

Информатика: Условие Дано число n и последовательность a1, a2, ..., an, в которой есть хотя бы одно число, большее 10. Необходимо найти номер последнего такого числа в последовательности. Формат входных данных Вводятся целое число n (1≤n≤1000), а затем целые числа a1, a2, ..., an (1≤ai≤215−1). Формат выходных данных Требуется вывести номер последнего числа в последовательности, которое больше 10. входные данные выходные данные 10 1 12 2 3 13 4 14 5 6 7

dionakavinep08o5z · Accepted Answer

Var i, count, number: integer; begin count : = 0; i : = 0; writeln( введите последовательность чисел ); repeat readln(number); if (number = 100) and (number = 999) and (number mod 4 = 0) then count : = count + 1; i : = i + 1 until (number = 0) or (i = 1000); writeln( кол-во 3значных чисел кратных 4 = , count); end....

Ответы на вопрос:

Популярно: Информатика