Размещено 5 лет назад по предмету
Информатика
от daha17
Определите, что будет напечатано в результате выполнения следующего алгоритма var a,b:integer; begin a:=0; b:=2364; while b>0 do begin if b mod 10<5 then a:=a+b mod 10; b:=b div 10; end; writeln(a); end.