Помогите, пожалуйста, решить задачу

← →
Skype © (2010-02-17 21:36) [0]

ВОт задача:
Надо найти минимальное неотрицательное число, которое надо прибавить к числу N, чтобы получившееся число содержало хотя бы одну цифру K.

Формат входных данных

Первая строка входного файла содержит целое неотрицательное число N (0 <= N < 1050). Вторая строка содержит цифру K (0 <= K <= 9).

Формат выходных данных

Вывести единственное неотрицательное целое число - ответ на задачу.

я написал на паскале:
var n,k,i: longint;
begin
readln(n,k);
if (n mod 10)<> k then repeat inc(n); i:=i+1;
until (n mod 10)=k;
write(i);
end.

но мне надо на делфи. помогите, пожалуйста

← →
Игорь Шевченко © (2010-02-17 21:42) [1]

> я написал на паскале:

> но мне надо на делфи

в чем разница ?

в количестве "букф"

Помогите, пожалуйста, решить задачу Найти похожие ветки