Я считаю что это рассказ мы узнаём из него много нового
4литра черной в бутыли
5л белой в ведре
3л синей в круглой банке
2л желтой в плоской
Алгоритм конец есть начало и конец
function sum(i, n: <em>integer</em>): <em>boolean</em>;
var
a, b: <em>integer</em>;
begin
a := i;
repeat
b := b + a mod 10;
a := a div 10;
until (a = 0);
sum := (b = n);
end;
var
n, i, k: <em>integer</em>;
begin
readln(n, k);
for i := 1 to k do
if sum(i, n) then
writeln(i);
end.
Я ВИЖУ СВОЙ КОМПЬЮТЕР ТАК ЧТО ОН БЕЛОГО ЦВЕТА СТОИТ НА МОЁМ НОВОМ СТОЛИКЕ ТАМ ГДЕ Я ОБЫЧНО ДЕЛАЮ ДОМАШНЕЕ ЗАДАНИЕ . ОН УМЕЕТ С ТОБОЙ РАЗГОВАРИВАТЬ И ВЫПОЛНЯТЬ ЕЩЁ МНОГО ИНТЕРЕСНЫХ ФУНКЦИЙ