Что будет выведено на экран в результате выполнения следующей программы, если ввести число x=521?
Var x,c1, c2, c3, c4: integer;
Begin writeln(“введите трехзначное число”);
Readln(x);
c1:=x mod 10;
c2:=x div 10;
c3:=c2 mod 10;
c4:=x div 100;
Writeln(c1, c2, c3, c4);
End.