Ответы на вопрос:
Program qq_a; uses crt; const n=16; var a: array[1..n] of integer; i: integer; begin for i: =1 to n do begin a[i]: =random((41)-20); end; for i: =1 to n do if a[i]=0 then writeln('a[',i,']=0') else writeln('нет нулевых элементов'); end.
Популярно: Информатика
-
Oishahon20.07.2021 15:57
-
polo73oye61z31.12.2022 05:46
-
Kisa55008.02.2021 23:33
-
bykhan214.02.2023 03:20
-
100π10023.05.2020 16:07
-
kristinanester199707.02.2020 14:15
-
Ира165609.09.2021 10:41
-
vladEfimenko106.06.2022 16:27
-
Dinez822.08.2020 08:36
-
Arina11193320.06.2020 03:48