Вывести элементы числовой последовательности, в записи значения которых содержится только одна цифра 5.

Question

Вывести элементы числовой последовательности, в записи значения которых содержится только одна цифра 5.

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a: array [1..10] of integer; i : integer; begin randomize; for i:=1 to 10 do A[i]:=Random(15); for i:=1 to 10 do if A[i]=5 then writeln('да то что надо ',A[i]) else writeln('ошибка'); readln ; end.