Какой вид графики нужно использовать для ретуширования ретуширования фотографий
166
366
Ответы на вопрос:
uses crt;
const n=10; var a: array[1..n] of integer; i,k,m,min,imin: integer; beginreadln(m); for i: =1 to m do beginreadln(a[i]); min: =min+a[i]; end;
for i: =1 to m do beginif a[i]< 0 then begink: =i; break; end; end;
for i: =1 to m do beginif a[i]< min then beginmin: =a[i]; imin: =i; end; end;
min: =a[imin]; a[imin]: =a[k]; a[k]: =min;
for i: =1 to m do write(a[i],' ');
end.
Популярно: Информатика
-
Нznm14.05.2023 04:38
-
nicoguy229.01.2023 08:46
-
МиланаЖиза08.11.2022 07:18
-
nastyaangel1315.10.2022 12:30
-
maksimys11.03.2023 03:53
-
DragonSeeS06.08.2022 12:47
-
Lapatkoanna08.06.2020 05:02
-
Ирина2940304.05.2021 19:20
-
vikaganzha09.03.2022 02:53
-
wehhc06.12.2020 13:58