Вопрос школьника по предмету Информатика
Задайте с клавиатуры натуральное число из 10 знаков. Составьте одномерный массив из цифр этого числа в порядке их следования.
Ответ учителя по предмету Информатика
Ответ:
Могу дать программу с интернета нашёл на паскале для разложение массива по возрастанию (сам на си занимаюсь)
Объяснение:
const n=10;
Var a:array[1..n] of integer; i,j,b:integer;
Begin
for i:=1 to n do read(a[i]);
for i:=1 to n-1 do
for j:=i+1 to n do
if a[j]<a[i] then
begin
b:=a[i];
a[i]:=a[j];
a[j]:=b;
end;
for i:=1 to n do write(a[i],’ ‘);
End.
Похожие вопросы от пользователей