Дана последовательность чисел, среди которых имеется один нуль. Вывести на печать все числа до нуля включительно.КуМир

Алг нач   цел n,j,i,n0   цел таб k[1:20]   вывод "Введите размер последовательности n>1", нс   ввод n  если n>1 то      вывод "Введите элементы последовательности, целые числа", нс      i:=0      нц n раз          i:=i+1          ввод k[i]          если k[i] = 0 то              n0:=i          все       кц      нц для j от 1 до n0          вывод k[j]      кц   все кон