Program z1;var a:array[1..16] of integer; i:integer;beginfor i:=1 to 16 do a[i]:=random(40)-20;for i:=1 to 16 do write(a[i],' ');for i:=1 to 16 do if a[i] mod 2=0 then writeln(i);end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
