pascal

[GANGSTER96]

погмите плиз:
№3
цифры данного четырехзначного числа N образуют строго возрастающую последовательность
№7
дано натуральное n.Вычислить
S=1-1/2+1/4-1/8+...+(-1)n*1/2n
n-все в степени

[denisbrain]

смысле помочь - чем
1 2 3 4

[GANGSTER96]

программу сосавить на паскале

[denisbrain]

Сообщение от GANGSTER96

программу сосавить на паскале

типа 1234,2345,3456,4567,5678,6789

[denisbrain]

var s:string;
    y,x:integer;
begin
writeln('-----');
   for y:=1 to 6 do begin

   for X:=y to y+3 do
     write(x);
     
     if y<>6 then  write(',');
     end;

end.