Pascalabc 9 класс хелп ме
решить :

1. запишите значение переменной s
a: = 1 ; s: =0;
while a< n do
begin
a: =a+1; s: =s+a; end;
writeln ('сумма' п, натуральных чисел равна s=",
s);
2. запишите значение переменной
s: =0; j: =10;
while j< > 100 do begin s: =s+j; j: =j+1;
end;
3. запишите значение переменной
s: =0;
i: =0;
while i< =6 do s: =s+i; i: =i+1;
writeln('s=", s);