porcedure OutLastDigit(n: Integer);
begin
if n > 0 then begin
Write(n mod 10);
OutLastDigit(n div 10);
end;
end;
А это на каком языке?Помогите пожалуйста переделать на Паскаль вот это =>
Задание: Написать рекурсивную процедуру для вывода на экран цифр натурального числа в обратном порядке.Код:porcedure OutLastDigit(n: Integer); begin if n > 0 then begin Write(n mod 10); OutLastDigit(n div 10); end; end;
Я не знаю...А это на каком языке?
на английском :mrgreen:А это на каком языке?
подскажите плыз... Нужно найти сумму элементов между первым и последним нулевыми элементами массива. массив задан рандумом.мне ток алгоритм нужен.тоесть если в массиве есть 2 нуля, то нужно сумму чисел между ними посчитать.