УМОЛЯЮ С ИНФОРМАТИКО С++ создать массив из 20 случайных чисел от -100 до 100 и найти в нем 2 самых близких друг другу числа

209

330

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

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

Trasir

Информатика

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

Const n = 20; var t: array[1..n] of integer; i, k: integer; begin randomize; writeln('элементы массива'); k : = 0; for i : = 1 to n do begin t[i] : = random(11)-5; write(t[i]: 3); if ((i mod 2)< > 0) and (t[i]=0) then inc(k); end; writeln; writeln('количество нулевых элементов на нечетных местах равно ',k); end. тестовое решение: элементы массива 2 5 -4 4 3 -2 5 -5 -1 -2 5 2 0 -5 -5 -4 -3 3 0 1 количество нулевых элементов на нечетных местах равно 2 const n = 18; var t: array[1..n] of integer; i: integer; begin randomize; writeln('элементы массива'); for i : = 1 to n do begin t[i] : = random(51)-25; write(t[i]: 4); end; writeln; writeln('результат'); for i : = 1 to n do begin if ((i mod 2)< > 0) then t[i] : = 0; write(t[i]: 4); end; writeln; end. тестовое решение: элементы массива 23 -6 8 14 15 12 -24 20 -11 -7 4 -24 22 -19 12 -6 21 17 результат 0 -6 0 14 0 12 0 20 0 -7 0 -24 0 -19 0 -6 0 17