Вычислить информационный объем сообщения "наступила осень " 1 символ=1 байт
270
332
Ответы на вопрос:
Var a: array of integer; i,n: integer; begin //заполняем массив сл. числами и выводим //нумерация массива с 0 write('число элементов массива '); readln(n); setlength(a,n); for i: =0 to n-1 do begin a[i]: =random(41)-20; write(a[i]: 4); end; writeln; //вывод номеров четных элементов for i: =0 to n-1 do if a[i] mod 2 = 0 then writeln(a[i]: 4, ' номер: ',i ); end. тестовое решение: число элементов массива 10 -5 14 3 13 4 1 18 7 12 -14 14 номер: 1 4 номер: 4 18 номер: 6 12 номер: 8 -14 номер: 9
Популярно: Информатика
-
Elyzaveta200407.03.2022 03:47
-
bua2004.02.2023 02:55
-
shram07026.10.2022 19:09
-
luciatarasova11.01.2021 23:45
-
GangsterNigga117.10.2020 17:49
-
Aleksandrik080617.09.2021 12:57
-
dasha197529.03.2020 02:04
-
FHN201716.06.2022 08:48
-
SmartPocan04.01.2020 20:10
-
kolitka115.04.2021 06:20