program z1;
const n=20;
var m:array [1..n] of integer;
i,Sp,S2p,Sp1,Sp2,ko,k2,k1:integer;
P:real;
begin
P:=1;
ko:=0;
k2:=0;
k1:=0;
for i:=1 to n do
begin
m[i]:=random(21)-10;
if m[i] > 0 then Sp:=Sp+m[i];
if (m[i] > 0) and (m[i] mod 2 = 0) then S2p:=S2p+m[i];
if i <= n div 2 then Sp1:=Sp1+m[i] else Sp2:=Sp2+m[i];
if m[i] <> 0 then P:=P*m[i];
if m[i] < 0 then ko:=ko+1;
if m[i] mod 2 = 0 then k2:=k2+1 else k1:=k1+1;
write(m[i]:5)
end;
writeln;
writeln('Сумма положительных элементов: ',Sp);
writeln('Сумма четных положительных элементов: ',S2p);
writeln('Сумма элементов в 1 половине массива: ',Sp1);
writeln('Сумма элементов во 2 половине массива : ',Sp2);
writeln('Произведение ненулевых элементов: ',P);
writeln('Количество отрицательных элементов: ',ko);
writeln('Количество с четными значениями: ',k2);
writeln('Количество с нечетными значениями: ',k1)
end.
Объяснение:
картинка
![Напишите программу, которая заполняет массив из 20 элементов случайными числами на отрезке [-10; 10]](/tpl/images/1630/1420/1f109.jpg)
Роботы рано или поздно поработят человечество? Ерунда. Но есть другая серьезная проблема, связанная с роботами, которую мы обычно игнорируем.
Джосс Райт обучает робота выводить людей из себя. Райт — ученый, работающий в области информатики. Эксперимент с человекоподобным роботом по имени Нао состоит в том, что этот робот будет приставать к людям на улице и демонстративно вторгаться в их личное пространство. Например, при встрече с незнакомцем Нао может использовать программу распознавания лиц, чтобы раздобыть о новом знакомом подробную информацию в интернете. Или может подключиться к истории перемещений его мобильного телефона. Или выяснить, где тот вчера обедал, и спросить, вкусный ли был суп.
Эксперимент - часть проекта под названием "Люди и роботы в общественном пространстве", цель которого исследовать, как люди взаимодействуют с роботами, и что случается, если машина-проказница знает о нас больше, чем мы думали.
Райт - один из многих исследователей, которых интересует, можем ли мы доверять роботам, которые вот-вот окончательно станут частью нашей жизни. Если верить Голливуду, наибольшую опасность представляют невероятная сила и интеллект роботов, и это угрожает самому существованию человечества.
Объяснение:
вот
1. слайдов
2. 2.
3. 2
4. вставка
5. 3.
6. текст, таблицы
7. 2.
8. 1.
9. 1.
10. 5.
11. 1.
12. 4.
13. 3.
14. 3.
15. да
16. 1.
17. 1.
18. 2.
19.вставка.
20. картинки
21. желания разраба
22. 2, 4.