l = []
for i in range(0, 4):
n = int(input())
l.append(n)
print(max(l[0], l[1], l[2], l[3], l[4]))
program chisla;
var a,b,c:real;
begin
write('Введите числа a,b и с через пробел:'); readln(a,b,c);
if (a<=b) and (b<=c) then begin
a:=exp(ln(a)*3);
b:=exp(ln(b)*3);
c:=exp(ln(c)*3);
end;
if (a>b) and (b>c) then begin
a:=-a;
b:=-b;
c:=-c;
end;
writeln(a,' ',b,' ',c);
end.
<em>;)</em>
Program chislo;var ch,pr,so,s:integer;beginpr:=1;writeln('Введите шестизначное число');readln(ch);so:=ch mod 10000;pr:=so div 1000;pr:=pr*(so mod 10);pr:=pr*((so mod 100)div 10);pr:=pr*((so mod 1000)div 100);writeln(Произведение первых 4 чисел=',pr)end.
350(6)=3*6^2+5*6^1+0*6^0
778(11)=7*11^2+7*11^1+8*11^0
1001001(3)=1*3^6+0*3^5+0*3^4+1*3^3+0*3^2+0*3^1+1*3^0
<span>10101101</span>(4)=1*4^7+0*4^6+1*4^5+0*4^4+1*4^3+1*4^2+0*4^1+1*4^0