ПОМОГИТЕЕЕ!!! Программа для...

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

  1. светосик

    светосик New Member

    ПОМОГИТЕЕЕ!!! Программа для нахождения суммы n -введенных вещественных чисел.
     
    светосик, 8 мар 2010
    #1
  2. vik_tor

    vik_tor New Member

    uses crt;
    var n,i:integer;
    sum:real;
    a:array[1..100] of real;
    begin
    writeln('Сколько чисел?');
    read(n);
    writeln('Введите числа');
    for i:=1 to n do
    begin
    read(a);
    sum:=sum+a;
    end;
    writeln(sum);
    end.
     
    vik_tor, 8 мар 2010
    #2

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

Наша группа