Var
a,b:Integer;
Begin
Writeln('Введите число - '); Readln(a);
if(a>0) then b:=a*a else if (a<0) then b:=a*2;
Writeln('Ответ: ',b);
End.
<!DOCTYPE html>
<html>
<head>
<script>
function BbIBOD()
{
let BBOD = document.getElementById("BBOD").value;
let BbIBOD = document.getElementById("BbIBOD");
let B = "";
switch (+BBOD)
{
case 1:
B = "Январь";
break;
case 2:
B = "Февраль";
break;
case 3:
B = "Март";
break;
case 4:
B = "Апрель";
break;
case 5:
B = "Май";
break;
case 6:
B = "Июнь";
break;
case 7:
B = "Июль";
break;
case 8:
B = "Август";
break;
case 9:
B = "Сентябрь";
break;
case 10:
B = "Октябр";
break;
case 11:
B = "Ноябрь";
break;
case 12:
B = "Декабрь";
break;
default:
B = "Такого месяца не существует. ";
break;
}
if ((BBOD < 1)||(BBOD > 12)){B += "И времени года тоже.";}
else
{
let A = +BBOD % 12;
switch ( true )
{
case ((A >= 0)&&(A < 3)):
B += ", Зима.";
break;
case ((A > 2)&&(A < 6)):
B += ", Весна.";
break;
case ((A > 5)&&(A < 9)):
B += ", Лето.";
break;
case ((A > 8)&&(A < 12)):
B += ", Осень.";
break;
}
}
BbIBOD.innerHTML = B;
}
</script>
</head>
<body>
<form onSubmit="BbIBOD(); return false;">
<label for="BBOD" >Введите номер месяца: </label><input id="BBOD" type="text">
<div id="BbIBOD"></div>
</form>
</body>
</html>
В 3 битах можно хранить максимум 8 различный цифр (2³), поэтому максимальное количество слов - 8.
1) 6 раз
2) 9 раз
3) 19 раз
P.S. могу ошибаться, возможно не так понял задачу.
l = list(map(int,input().split())) # <em>ввод чисел
</em>
a = [] # массив для вторых цифр
for i in range(len(l)):
a.append(l[i] % 10) # <em>заполнение массива вторыми цифрами
</em>
print(l[a.index(max(a))]) # <em>вывод числа, в котором вторая цифра больше </em>