Определить и вывести на экран по отдельности цифры целого числа N
Определить и вывести на экран по отдельности цифры целого числа N
Гость
Ответ(ы) на вопрос:
Гостьvar
i,num:integer;
num_s:string;
begin
write('vvedite celoe chislo: ');
read(num);
num_s:=IntToStr(num);
for i:=1 to num_s.length do
write(' ',num_s[i]);
end.
Не нашли ответ?
Похожие вопросы