Advertisement
Guest User

Untitled

a guest
Mar 28th, 2020
122
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.09 KB | None | 0 0
  1. var x : integer;
  2. 123
  3. begin
  4. read(x);
  5. writeln(x div 100 + x div 10 mod 10 + x mod 10);
  6. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement