Есть ответ 👍

Исправить код (не сортирует масив). метод сортировки: выбором (50 ).

237
263
Посмотреть ответы 1

Ответы на вопрос:

jendossia
4,8(64 оценок)

Var a: array[1..100] of integer; i: integer; c,e: real; begin for i: =1 to 100 do  begin   a[i]: =i;   e: =a[i] div 2;   c: =a[i]/2;     if e=c then       write(a[i],' ');   end; for i: =100 downto 1 do   begin      a[i]: =i;   e: =a[i] div 2;   c: =a[i]/2;     if e=c then       write(a[i],' ');   end; end.

Популярно: Информатика