using System;
using System.Linq;
using static System.Console;
class Program
{
static void Main()
{
int x=int.Parse(ReadLine());
var t=x.ToString().Select(n=>(int)n).Reverse().ToList();
WriteLine((t.FindIndex(n=>n==t.Max())+1).ToString());
}
}
//1
var x: real;
begin
write('x = ');
readln(x);
writeln(abs(10 - sqrt(1 + x * x)));
end.
//2
begin
randomize;
writeln(random(15) + 21);
end.
//3
var a, b: real;
begin
write(' Катет a = ');
readln(a);
write(' Катет b = ');
readln(b);
writeln(' Гипотенуза = ', sqrt(a * a + b * b));
end.
Строку for var.. надо поменять на
for var n:=k to 1 do
1)01,10,11
2) двоичный код