Даны 4 цифры. дописать программу, которая вычислит - вопрос №40125473019 от Leoger 13.07.2022 16:21

Question

Информатика: Даны 4 цифры. дописать программу, которая вычислит число по этим цифрам. var a0, a1, a2, a3: longint; begin read(a3, a2, a1, a0); write(a) end. пример: ввод: 1 5 9 8 вывод: 1598

Leoger · Answer

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.