profile
Опубликовано 6 лет назад по предмету Информатика от 484985767

написать на Паскале условие задачи №2: ввод с клавиатуры последовательности чисел заканчивается вводом нуля, найти произведение этих чисел, нуль в последовательность не входит.

  1. Ответ
    Ответ дан PsyhoAssasin

    Program Chisla;

    Uses Crt;

    var p,c:real;

    begin

         clrscr; 

          write('Введите числа конец ввода 0:');

           p:=1;

          repeat

               readln(c);

               if (c=0) then break
                     else p:=p*c;   

        until (c=0);

       writeln('Произведение чисел= ',p);

       readkey;

     end.

     

Самые новые вопросы