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

Question

Информатика

Иоанн

22 июля, 20:25

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

+3

Ответы (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.