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

Question

Информатика

Ростиславка

22 июля, 09:22

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

+4

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