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

1

Ответы и объяснения

2013-12-21T01:15:02+04:00
Var a:byte;
begin
write('a - ');
readln(a);
writeln(a div 100);
writeln((a div 10)mod 10);
writeln(a mod 10);
readln
end.