Написать программку, которая обретает сумму частей последовательности из 5 целых чисел.

А программу саму вполне написать не сможешь? Просто я так малюсенько разумею

я не изучал паскаль:(

я basic изучал

оправдываюсь:(

Я напишу программку. Только завтра уж. Полагаюсь, Вам не безотлагательно?

Уточните пожалуйста, для какой среды разработки для вас нужен код?

PascalABC или Delphi

?*

ой, извините, не увидел, что для PascalABC необходимо...

на данный момент напишу

Program Project1;
var   
a:array[1..5] of Integer;   
i, j, sum:Integer;   
s:string;
begin 
Readln(s); 
sum:=0; 
 for i:=1 to 5 do 
    begin   
         if (Length(s)gt;=2) then   
            begin     
              j:=Pos(' ', s);     
             a[i]:=StrToInt(Copy(s, 1, j-1));     
             sum:=sum+a[i];     
             Delete(s, 1, j);   
             end   
         else   
     begin     
      a[i]:=StrToInt(s);     
      sum:=sum+a[i];   
    end; 
end; 
   for i:=1 to 5 do 
      begin   
         if (a[i]lt;gt;0) then   
              begin     
                a[i]:=a[i]-sum;     
                Write(a[i], ' ');   
              end   
         else   
           begin     
              a[i]:=a[i];     
              Write(a[i], ' ');   
           end; 
      end; 
end.