Question

S=1+2+3+4+5+7+10+14
Помогите пожалуйста решить паскаль

Answer 1

var a1,a2,a3,a4,a5,a6,a7,a8,s:integer;
begin
readln(a1,a2,a3,a4,a5,a6,a7,a8);
s:=a1+a2+a3+a4+a5+a6+a7+a8;
writeln('s=',s);
end.