Pascal для новичка даю 44!!!!!!Дано натуральное число. Определите, сколько раз в

Ответ:

Разъясненье:

Алгоритм:

1) определяем первую, вторую и третью цифру

2) разыскиваем минимальную цифру числа

3) считаем их количество

var a, sotni, desatki, edinicy, min_number, n: integer;

begin

read(a);

sotni := a div 100;

desatki := a div 10 mod 10;

edinicy := a mod 10

if sotni lt; desatki then

begin

if desatki lt; edinicy then min_number := sotni

else

if sotni lt; edinicy then min_number := sotni else min_number := edinicy

end

else

if desatki gt; edinicy then min_number := edinicy

else

min_number := desatki;

n := 0;

if min_number = desatki then n += 1;

if min_number = sotni then n += 1;

if min_number = edinicy then n += 1;

print(n)

end.

Сейчас рассказываю, почему надо учить питон. Та же программа:

number = list(map(int, input().split()))

print(number.count(min(number)))