<span>233 236 </span>248 241
Int main(){
int s, q;
cin >> s;
q = 0;
while (s > 0){
q++;
s/=10;
}
cout << q;
return 0;
}
Если я правильно понял, то:
program x;
var x,y,a;
begin
readln(x,y);
if x < y then
begin
a:=x;
x:=y;
y:=a;
end;
writeln(x,y);
end.
Program z2; Var n,i:integer; Begin Write('N = '); readln(n); while n>0 do begin write(n,' '); n:=n-1; end;End.