Напишите программу, которая вводит трехзначное число и разбивает его на цифры. Пример: при вводе числа 123 программа должна вывести "1, 2, 3"

Question

Информатика

Роня

22 сентября, 18:21

Напишите программу, которая вводит трехзначное число и разбивает его на цифры. Пример: при вводе числа 123 программа должна вывести "1, 2, 3"

+5

Ответы (1)

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

Палуня · Answer 1

Var numb, sot, des, ed:integer;

begin

readln (numb) ;

sot:=numb div 100;

des: = numb mod 100;

des: = des div 10;

ed: = numb mod 10;

writeln (sot,' ', des,' ', ed) ;

end.