3. Дано целое трехзначное

число А. Вывести цифры этого числа на экран в столбик.

паскаль

Question

Еля

11 февраля, 06:54

+4

Ответы (1)

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

Мишута · Answer 1

Var a:byte;

begin

write ('a - ') ;

readln (a) ;

writeln (a div 100) ;

writeln ((a div 10) mod 10) ;

writeln (a mod 10) ;

readln

end.

3. Дано целое трехзначноечисло А. Вывести цифры этого числа на экран в столбик.паскаль