Составить программу, которая позволяет найти сумму первой и третьей цифры в четырехзначном числе.

Question

Информатика

Настасья

27 июня, 18:13

Составить программу, которая позволяет найти сумму первой и третьей цифры в четырехзначном числе.

+4

Ответы (1)

Знаете ответ на вопрос?

Петюка · Answer 1

Program test_sum;

begin

var inp_num : integer;

readln (inp_num) ;

var a, b : integer;

a : = inp_num[0];

b : = inp_num[2];

var res : = a + b;

writeln ("Сумма 1 и 3 цифры равна: ", res) ;

end.