Давайте разберём пошагово, что произойдёт при выполнении данной программы, если ввести число ( x = 521 ).
Инициализация переменных:
- Объявлены переменные ( x, c1, c2, c3, c4 ) типа integer.
Ввод значения:
- Пользователю предлагается ввести трёхзначное число. Он вводит ( x = 521 ).
Выборка цифр числа:
( c1 := x \mod 10 )
- Операция ( x \mod 10 ) вычисляет остаток от деления ( x ) на 10.
- Для ( x = 521 ): ( 521 \mod 10 = 1 ).
- Таким образом, ( c1 = 1 ).
( c2 := x \div 10 )
- Операция ( x \div 10 ) вычисляет целую часть от деления ( x ) на 10.
- Для ( x = 521 ): ( 521 \div 10 = 52 ).
- Таким образом, ( c2 = 52 ).
( c3 := c2 \mod 10 )
- Операция ( c2 \mod 10 ) вычисляет остаток от деления ( c2 ) на 10.
- Для ( c2 = 52 ): ( 52 \mod 10 = 2 ).
- Таким образом, ( c3 = 2 ).
( c4 := x \div 100 )
- Операция ( x \div 100 ) вычисляет целую часть от деления ( x ) на 100.
- Для ( x = 521 ): ( 521 \div 100 = 5 ).
- Таким образом, ( c4 = 5 ).
Вывод результатов:
Команда ( Writeln(c1, c2, c3, c4) ) выводит значения переменных ( c1, c2, c3, c4 ) на экран в указанном порядке.
Следовательно, будут выведены значения: ( 1, 52, 2, 5 ).
Таким образом, результат выполнения программы при вводе числа ( x = 521 ) будет:
15225
То есть, программа выведет на экран строку, содержащую значения переменных ( c1, c2, c3 ) и ( c4 ) без пробелов между ними.