На стоянке нумеровали парковочные места и случайно на двух местах написали один и тот же номер. какой номер написали дважды, если сумма всех номеров составила 1322?
Решить задачу можно так: var i,sum:integer; begin sum:=0; i:=0; while sum<1322 do begin i:=i+1; sum:=sum+i; end; writeln(i,' ',sum); writeln('Дважды написали ',i-(sum-1322)); end. Получается 47
var i,sum:integer;
begin
sum:=0; i:=0;
while sum<1322 do
begin
i:=i+1; sum:=sum+i;
end;
writeln(i,' ',sum);
writeln('Дважды написали ',i-(sum-1322));
end.
Получается 47