На паскале abc (не с суппер пуппер версий ) () полное - вопрос №8808495 от pashainshakov 20.01.2021 11:46

Question

Информатика: На паскале abc (не с суппер пуппер версий ) () полное решение : найти сумму цифр натурального числа, которые не больше 5. формат ввода: на вход подается натуральное, не превосходящее 30000. формат вывода: целое число. пример входных данных 650 пример выходных данных 5

pashainshakov · Answer

Var  x, sum: integer;begin  read(x);  while(x 0) do  begin    if(x mod 10 = 5) then sum := sum + x mod 10;    x := x div 10;  end;  write(sum);end....