Ответы на вопрос:
.edu образование
.fr Франция
.org организации
.gov правительство
судя логике из данного списка только 1 домен географический! .fr Франция
Const n=10; var s1,s2,i: integer; var a: array[1..n] of integer; begin s1: =0; s2: =0; writeln ('исходный массив'); for i: =1 to n do begin a[i]: =random(-10,10); write (a[i]: 3); if a[i]> =0 then s1: =s1+a[i] else if a[i] mod 2< > 0 then s2: =s2+a[i]; end; s1: =s1*2; writeln; writeln ('удвоенная сумма положительных элементов = ',s1); writeln ('сумма нечетных отрицательных элементов = ',s2); end. : исходный массив -2 0 8 -6 -1 6 7 -4 -7-10 удвоенная сумма положительных элементов = 42 сумма нечетных отрицательных элементов = -8
Популярно: Информатика
-
krivisasha426.05.2020 17:54
-
Алeна124.09.2020 09:17
-
Ariana03070921.12.2020 13:00
-
grrrrrrrrrr23.04.2023 20:34
-
allornothing28.09.2020 09:08
-
МАРИШКАНИК15.01.2021 00:56
-
MRA1624.02.2020 00:42
-
Darina258121.11.2021 17:00
-
Krest00703.07.2021 14:13
-
Sillyteenager23.05.2021 01:50