Помогите пожалуйста
Составить программу для последовательного произведения вводимых с клавиатуры целых чисел ,предусмотреть выход из произведения при вводе нуля
Ответы
Ответ дал:
0
Нет под рукой щас паскаля, вот примерный цикл
readln(Input); res := Input; while (not(Input = 0)) do begin readln(Input); res := res * Input; end;
readln(Input); res := Input; while (not(Input = 0)) do begin readln(Input); res := res * Input; end;
Вас заинтересует
1 год назад
5 лет назад
5 лет назад
8 лет назад
8 лет назад
8 лет назад