Составьте блок-схемы и программы для решения следующих . для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. · если разность первого и последнего, превышает второе, то выведите второе число. · если сумма второго и третьего меньше четвертого числа, то выведите эту сумму. · если выполняются одновременно два перечисленных выше условия, то выведите второе число и сумму второго и третьего чисел. · иначе, выведите все четыре числа без изменения.

Если смотреть с точки зрения Паскаля, то получается такая ересь:
var
x,z,c,y:real;
begin
writeln('введите первое  число'); readln(x);
writeln('введите второе число'); readln(z);
...
Q:=x-y;(разность первого и последнего числа);
W:=z+c;(сумма второго и третьего числа);
В случае если выполняются эти два условия
if Q > z then
if W < y then 
begin 
writeln(W);
writeln(z);
end
else 
if Q > z then writeln(z) 
else
if W < y then writeln(W);
end.