Решить в Pascal ABC!!!
Вася-сладкоежка в первый день съел 10 конфет, а потом каждый день увеличивал дозу на 5 конфет. Когда у Васи заболят зубы, если боль появляется из-за K съеденных конфет в день.
Решить с WHILE...

спасибо а это сможешьКакой цифрой оканчивается сумма всех двузначных чисел, в записи которых имеется хотя бы одна цифра 3.

var doza,k,day : integer;begin  doza := 10;  day := 1;    writeln('Сколько конфет нужно есть, чтобы заболели зубы?');  write('> ');  readln(k);    while (k > doza) do  begin    doza := doza + 5;    day := day + 1;  end;    writeln('Зубная боль наступит через '+day+' дней');end.