Помогите) Нужно написать код программы) Суть программы: Надо запросить с пользователя число и потом что бы он разложилось на части. Ти по 251, а получается 2_5_1.

Question

Информатика

Платонида

7 мая, 02:29

Помогите) Нужно написать код программы) Суть программы: Надо запросить с пользователя число и потом что бы он разложилось на части. Ти по 251, а получается 2_5_1.

+4

Ответы (1)

Знаете ответ на вопрос?

Фетинья · Answer 1

Проще всего задача решается, если разрешено использовать строки:

var a, i:integer; s:string;

begin

write ('Введите число = ') ; readln (a) ;

str (a, s) ;

for i:=1 to length (s) - 1 do write (s[i],'_') ;

writeln (s[length (s) ]) ;

end.