носок мозоль георгин помидор - мозоль
<em>озимь цитадель фланель панцирь - панцирь</em>
<u>подстаканник подорожник подснежник подлокотник .- подорожник</u>
1. Б
3. Б
5. В
7. Б
8. Б
9. А
10. В
11. А
12. Г
13. В
14. А
15. А
16. Г
17. Г
18. В
19. Б, Д
20. Д, В
Честно не уверена, что это верно. Но думаю что-то да правильное есть
По таблице кодов символов win1251 слово "цените"
Двоичный код 11110110 11100101 11101101 11101000 11110010 11100101
const n=10;
var a:array[1..n] of integer;
i: integer; p: longint;
begin
writeln('Введите элементы массива:');
for i:=1 to n do read(a[i]);
p:=1;
for i:=1 to n do p:=p*a[i];
writeln('p = ',p);
end.
Пример:
Введите элементы массива:
2 -3 4 1 8 -1 5 -7 -2 3
p = 40320