Где ошибка? ? : написать на паскале программу, которая запрашивает с клавиатуры n произвольных целых чисел и ищет их сумму. число n вводится с клавиатуры. разработать для созданной программы не менее трёх тестов и проверить на них правильность работы алгоритма. я написала так: uses crt; var n,i,s,c: integer; begin clrscr; readln(n); s: =0; for i: =1 to n do begin readln(c); s: =s+c; end; writeln(s); readkey; end. где здесь допущена ошибка? !
uses crt;
var n,i,s:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
begin
s:=s+i;
end;
writeln(s);
readkey;
end.