Дан одномерный массив размерностью N, заполненный случайными ...
Дан одномерный массив размерностью N, заполненный случайными числами в интервале от -15 до 20. Вывести на экран значения элементов массива, абсолютное значение которых >10.
Есть ответ
12.12.2022
291
Ответ
Ответ:
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.
Объяснение:могу быть не прав
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
12.12.2022