Написать псевдокод (или...

Тема в разделе "Информатика", создана пользователем Vase4ka, 18 мар 2010.

  1. Vase4ka

    Vase4ka New Member

    Написать псевдокод (или блок схему) и код программы для решения следующей задачи: Вычислить среднее арифметическое для чисел, вводимых с клавиатуры.Результат вывести на экран
     
    Vase4ka, 18 мар 2010
    #1
  2. Anuta_angel

    Anuta_angel New Member

    Uses crt;
    var a,sum,k:integer;
         sr: real;
    begin
         sum:=0;
         k:=0;
         writeln('Вводите числа. 0 - конец последовательности');
         repeat
              readln(a);
              sum:=sum+a;
              inc(k);
         until a=0;
         writeln(sum/(k-1));
    end.
     
    Anuta_angel, 18 мар 2010
    #2

Поделиться этой страницей

Наша группа