Используйте одномерный массив для решения следующей . прочитайте 20 чисел, каждое из которых находится в диапазоне от 10 до 100 включительно. после того, как прочли очередное число, напечатайте его, но только в том случае, если оно не дублирует ранее прочитанные числа. предусмотрите "наихудший" случай, когда все 20 чисел различны. используйте наименьший возможный массив для решения этой . паскаль! 20

294

470

Посмотреть ответы 2

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

anitamirzikkk

Информатика

4,5(19 оценок)

Для того, чтобы узнать, не встречалось ли 20-е число раньше, надо помнить, какие числа были до этого. так что без массива с меньшим размером, чем 19, не обойтись (на самом деле это так, только если в каждом элементе массива хранить только одно число. но мы так и будем делать). алгоритм для решения выберем простой: записываем все предыдущие числа в массив и для каждого следующего числа проходим по массиву. var a: array[1..19] of byte; i, j, t: byte; begin for i : = 1 to 20 do begin read(t); if i < 20 then a[i] : = t; for j : = 1 to i - 1 do if a[j] = t then t : = 0; if t > 0 then write(t, ' '); end; end. пример ввода: 1 1 2 2 3 3 4 4 5 5 6 6 7 7 8 8 9 9 10 10 пример вывода: 1 2 3 4 5 6 7 8 9 10