Регистрация
2005NickName2005
03.04.2023 14:47
Информатика
Есть ответ 👍

Екі кестені байланыстыратын заңдылықты тап. Сандық жинақтарды екінші кестеге орналастыр.
ТІ
1.
3.
4. 10001011
6.
8.
4 Артқа
Тексеру​

254
390
Посмотреть ответы 2

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

lvcenkoirina
lvcenkoirina
4,6(39 оценок)
Можно по русски
ladykati
ladykati
4,4(34 оценок)
Const n=15; var a: array[1..n]of integer; i,min,k: integer; begin for i: =1 to n do a[i]: =random(100)-20; for i: =1 to n do write(a[i],' '); writeln; min: =a[1]; for i: =1 to n do if (a[i]< min) and (a[i]> 0) then begin min: =a[i]; k: =i; end; write('минимальный из положительных элементов массива ',min,', его порядковый номер  ',k); end.

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