Даны 4 цифры. дописать программу, которая вычислит число по этим цифрам. var a0, a1, a2,...

Question

Даны 4 цифры. дописать программу, которая вычислит число по этим цифрам.

var a0, a1, a2, a3: longint;
Begin
read(a3, a2, a1, a0);
...
write(a)
End.

пример:
ввод:
1
5
9
8
вывод:
1598

Answer 1

1. Добавьте в описание переменных переменную a
2. код будет такой:

var a0, a1, a2, a3, a: longint;
Begin
  read(a3, a2, a1, a0);
  a:=a0+a1*10+a2*100+a3*1000;
  write(a)
End.

Comments

спасибо большое

---

Пожалуйста, успехов!