program SumOfFourNumbers;

var
num1, num2, num3, num4, sum: Integer;

begin
// Ввод четырёх чисел
Write('Введите первое число: ');
Readln(num1);

Write('Введите второе число: ');
Readln(num2);

Write('Введите третье число: ');
Readln(num3);

Write('Введите четвёртое число: ');
Readln(num4);

// Вычисление суммы
sum := num1 + num2 + num3 + num4;

// Вывод результата
Writeln('Сумма четырёх чисел: ', sum);
end.