Дан массив действительных чисел А их 10 элементов, заданных случайным
образом в диапазоне от 0 до 44. Заменить все члены, большие заданного x, этим
числом. Число х вводится с клавиатуры.
Ответы
Ответ дал:
0
Ответ:
Const N=10;
Var A: array [1..N] of integer;
i, x: integer;
begin
writeln ('Введите х');
readln (x);
for i:=1 to N do
begin
A[i]:= random (45);
end;
for i:=1 to N do
begin
If A[i] > x then A[i]:= x;
write (A[i], ' ');
end;
end.
Объяснение:
Вас заинтересует
1 год назад
1 год назад
7 лет назад