Сколько существует трёхзначных чисел, в записи которых встречается только одна двойка? Составьте программу для получения правильного ответа.

Question

Информатика

Седерина

9 августа, 09:36

Сколько существует трёхзначных чисел, в записи которых встречается только одна двойка? Составьте программу для получения правильного ответа.

+1

Ответы (1)

Знаете ответ на вопрос?

Амврам · Answer 1

var a, b, c, k: integer;

begin

k:=0;

for a:=1 to 9 do

for b:=0 to 9 do

for c:=0 to 9 do

if (a=2) and (b2) and (c2) or

(a2) and (b=2) and (c2) or

(a2) and (b2) and (c=2) then k:=k+1;

writeln ('k = ', k) ;

end.

Результат:

k = 225