Ответы на вопрос:
ответ:
program abc;
const n=35;
var a, b: array[1.. n] of integer;
i, j: integer;
begin
randomize;
for i: =1 to n do
a[i]: = random (20)-15;
for i: =1 to n do
write (a[i]: 4);
j: =1;
for i: = 1 to n do
if a[i]> 10 then
begin
b[j]: =a[i];
inc[j];
end;
for i: = 1 to n do
write(b[i],' ');
readln;
end.
объяснение: могу быть не прав
Популярно: Информатика
-
egornikitin1028.01.2023 18:02
-
anisimovamargar117.05.2021 03:28
-
Aikony20.03.2022 16:29
-
Михона19.07.2021 07:57
-
anton2015b30.09.2022 13:12
-
NamaruC322.06.2020 21:07
-
zombdanidani16.05.2023 00:42
-
Марано17.01.2021 21:28
-
варваритос202016.02.2021 19:57
-
aynurwuk25.11.2020 13:38