Помогите решить люди). Подсчитайте количество нулевых элементов в массиве из 10 целых чисел и распечатайте исходный массив в обратном порядке.
Помогите решить люди).
Подсчитайте количество нулевых элементов в массиве из 10 целых чисел и распечатайте исходный массив в обратном порядке.
Гость
Ответ(ы) на вопрос:
Гостьfor i 1 to 10 do
if a[i]=0 then
inc(k)
=====
for i 10 downto 1 do
write(a[i]:4:2)
Не нашли ответ?
Похожие вопросы