Составить программу которая вызначает сколько складаемых должно быть в сумме 1+2+3+4+..., чтобы сумма оказалась больше чем задуманное число n . 25 баллов. Pascal ABC

Давай тогда вместе подумаем

го вк

program primer; var a, s, n: integer;beginwriteln("введите число");readln(n);a:=1;while s > n do begins:= s + a;a:=a+1;end;writeln(a);end.может так? проверь