Question

Пожалуйста напишите программы на Паскаль

Ввести 4 числа . Если разность 2 и 3 числа равна 5 ,то найти сумму 1 и 4 числа

Answer 1

Программа:

var a,b,c,d: integer;

begin

readln(a,b,c,d);

if b-c=5 then writeln(a+d);

end.

Пример:

2 8 3 5

7