помогите,пожалуйста
Постороить программы используя одномерный массив из 100 чисел.Найти элементы которые больше 10 и вывести квадрат этих чисел до 100.
Ответы
Ответ дал:
0
n:=10
for i:=1 to n do
begin
arr[ i ] := random(50);
writeln(arr[ i ]);
end;
min:=arr[ 0 ];
for i:=1 to n do
if (arr[ i ] < min) then min := arr[ i ];
arr[ 0 ]:=min;
for i:=1 to n do
write(arr[ i ],' ');
мой брат писал
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад