Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
4546
program pr12c; var i,p,n,mini:integer; begin write('Введите число: '); readln(n); mini:=10; while n <> 0 do begin p:=n mod 10; n:=n div 10; if p<mini then mini:=p; end; writeln('Наибольшая цифра: ',mini); end.
run
|
edit
|
history
|
help
0
P170808A
zadanye 3 a
bilete
Largest Prime Factor
(p,q,r)
x=2;n=3
1
Задачи к § 66 «Символьные строки» Задача №112336. Замена a-b в последовательности символов.
zad27-optimal
test25