Регистрация
Frizi4
16.06.2021 04:28
Информатика
Есть ответ 👍

Вводить последовательность чисел до тех пор пока не введено ноль

145
385
Посмотреть ответы 3

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

aleksandr17082004
aleksandr17082004
4,4(78 оценок)
//pascal abc.net v3.1 сборка 1219 begin   var seq: =seqwhile( -> -> x< > 0).toarray;   seq.print; end. пример ввода: 1 2 0 пример вывода: 1 2
Uliana44441
Uliana44441
4,4(26 оценок)
//сделал лугачев кирилл //специально для program null; var  start: integer; begin      write('вводите числа, 0 означает выход: ');   read(start);   while not(start = 0) do  begin    readln(start);   end; end.
vlinkova4
vlinkova4
4,4(83 оценок)
По цвету,по размеру .по форме

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