Определите заначение переменной s после выполнения фрагмента программы при указанных занчениях a
A = 5 a = 5 a = 10 Я сверил, именно это правильные ответы. (Сверил в программе PascalABC.net)
ое
а полностью решение можете скинуть
program modf; var a, p, s : integer; begin a := 109; p := a; s := 0; while p>0 do begin s := s + p mod 10; p := p div 10; end; writeln(s); end.
и у меня к вам сапасибо не ставиться
Вместо 109, надо ставить числа которые указаны в задании.
ок
Можешь сам проверить, через программу PascalABC.NET