Ответ: спасибо, сейчас попробую ввести
Ответ: var n,i,s,c:integer;beginreadln(n);for i:=1 to n do //сколько произвольных чисел будет.beginreadln(c); //вводим произвольные числаs:=s+c; //суммируемend;writeln(s); //Вывод суммыend.
Ответ: спасибо, сейчас попробую ввести
Ответ: var n,i,s,c:integer;beginreadln(n);for i:=1 to n do //сколько произвольных чисел будет.beginreadln(c); //вводим произвольные числаs:=s+c; //суммируемend;writeln(s); //Вывод суммыend.