Задание:
3. Дано целое трехзначноечисло А. Вывести цифры этого числа на экран в столбик. Паскаль
Решение:
Var a: byte; beginwrite ('a — '); readln (a); writeln (a div 100); writeln (a div 10) mod 10); writeln (a mod 10); readlnend.
Знаете другой ответ?