Run Code
|
API
|
Code Wall
|
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
janja - naloga 2 - 9.2.2011
uuu
ds
пи методом монте карло на единичной окружности
подсчёт символов и цифр пока не точка
BubbleSort (slimmer)
Bilangan fibonacci ke-1 sampai ke-n
buscar_numero_V2_divisible_5
test22
Урок 2. Функции: