«Statistical Psychology for the Social Sciences» – «статистический пакет для психологов и социологов»
Program n1;
var i: integer;
begin
for i:=0 to 8 do writeln('при x=',i,' y=',i*i+3);
end.
N = int(input('n = '))
n1 = n // 100
n2 = n // 10 % 10
n3 = n % 10
if (n1<n2): n1,n2 = n2,n1
if (n2<n3): n2,n3 = n3,n2
if (n1<n2): n1,n2 = n2,n1
m = n1*100+n2*10+n3
print('m = ',m)
Пример:
<span>n = 149
m = 941</span>
Program asd;
var i,n:integer;
begin
read(n);
while n>0 do begin
i:=i + n mod 10;
n:=n div 10;
end;
write(i);
end.