Как это понимать? Такая какаета билиберда страная нечё не распознать
Readln(n);
a = n div 20;
writeln(a);
110111 = 10+1+0+1+1+1. 112 = 1+12+100
Int n;
Console.WriteLine("Введите возраст");
n = Convert.ToInt32(Console.ReadLine());
switch (n)
case 1:
Console.WriteLine("{0} год", n);
case 2:
Console.WriteLine("{0} года", n);
И так дальше расписываешь, можешь немного сократить код и запихнуть цифры, где год или лет одинаковы.
Program sto;Vara,b:integer;BeginReadln(a);b:= 100 - a; //Вычисляем остаток которы нужно прибавить к числу, и записываем его в переменную b;Writeln('Если к вашему числу прибавить: ',b,', то в результате будет 100'); //Выводим ответ пользователю;End.