Question

Программа должна выводить 1,2,3 если я ввиду 123 у меня получается 1 0 3 (без запятых почему то) что у меня неправильно , нужно program go; var a,b,c,d: integer; begin writeln('введите трехзначное число'); readln(a); b: = a div 100; c: = c mod 10; d: = a mod 10; writeln(b,' ',c,' ',d); end.

Answer 1

var

   a, b, c, d: integer;

begin

   writeln('Введите трехзначное число');

   readln(a);

   b := a div 100;

   c := a div 10 mod 10;

   d := a mod 10;

   writeln(b, ', ', c, ', ', d);

end.