для кодирования символов @,$,&,% используй s2 ночные последний клип вечный числа. [email protected],01-$,10-&,11-%.Последовательность $%&&@$.Декодрируйте данную последовательность привдите результат 16 ричную систему исчисления .
220
227
Ответы на вопрос:
Var m: array [1..10000] of integer; a,n,i,j: integer; begin writeln('введите n: '); readln(n); j: =0; writeln('введите последовательность чисел: '); for i: =1 to n do begin readln(a); if (a mod 2)< > 0 then begin j: =j+1; m[j]: =a; end; end; if j=0 then writeln ('нечетных чисел нет в данной последовательности.') else begin writeln ('нечетные числа в данной последовательности: '); for i: =1 to j do write(m[i],' '); writeln; end; end.
Популярно: Информатика
-
соня17715.01.2020 19:33
-
Blackrabbit30040125.10.2022 11:46
-
alenaalefirova04.02.2020 07:31
-
drwnd14.04.2022 21:14
-
Gulshat5126.03.2021 00:24
-
ksenia91517.09.2022 10:49
-
Vera444102.01.2022 20:53
-
25durak16.01.2022 22:52
-
vinogradka00902.10.2020 18:45
-
almioaistaeva05.01.2023 08:40