Ответ
2F516₁₆<span> = </span>193<span>814</span>₁₀
var a: integer;
begin
writeln ('Введите номер пальца');
readln(a);
if a=1 then writeln ('Большой палец');
if a=2 then writeln ('Указательный палец');
if a=3 then writeln ('Средний палец');
if a=4 then writeln ('Безымянный палец');
if a=5 then writeln ('Мизинец');
end.
21 это точно правильный ответ
1) В переменной a вычисляется количество четных цифр в числе x, в переменной b - количество нечетных цифр. Общее количество цифр в числе = 3+2=5. Наименьшее пятизначное число, удовлетворяющее условиям = 10001.
2) В переменной L вычисляется количество цифр в числе x, следовательно искомое число трехзначное. Значение 120 можно получить как результат 4*5*6 (все сомножетели >=1 и <=7). Так как в цикле x меняется по правилу x:=x div 8, то искомое число = 654(8) = 428(10).
Var X,Y:real;
Begin
Write('X = ');Read(X);
Write('Y = ');Read(Y);
if (X*X+Y*Y=1)or( (X>=0)and(Y>=0)and(X<=1)and(Y<=1) ) then Write('Попала')
else Write('Мимо')
End.