DIM X, L, M AS INTEGER INPUT X L=0: M=0 WHILE X > 0 L = L+1 IF M <(X MOD 10) THEN M = X MOD 10 ENDIF X = X \ 10 WEND PRINT L PRINT M
|
var x, L, M: integer; begin readln(x); L := 0; M := 0; while x>0 do begin L := L+1; if M < (x mod 10) then begin M := x mod 10; end; x := x div 10; end; writeln(L); write(M); end.
|
#include<stdio.h> void main() { int x, L, M; scanf("%d", &x); L=0; M=0; while (x>0){ L=L+1; if M < x % 10 { M = x % 10 } x= x/10; } printf("%d\n%d", L, M); }
|
алг нач цел x, L, M ввод x L := 0; M := 0 нц пока x>0 L := L+1 если M < mod(x,10) то M := mod(x,10) все x := div(x,10) кц вывод L, нс, M кон
|