Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Code1
program HelloWorld; var N, digit, maxDigit: longint; begin readln(N); maxDigit:=-1; while N>0 do begin digit:=N mod 10; if digit mod 5 = 0 then if digit > maxDigit then maxDigit:=digit; N:= N div 10; end; if maxDigit >=0 then writeln(maxDigit) else writeln('NO'); end.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
0
test25
3
Registracioni broj firme
Tri 1.0
hello world
test04
Урок 2. Функции:
gg
123
Please log in to post a comment.