По программированию линейному алгоритму составить 1.сумму а и б 2.частное х и у. 3. произведение ав и сд тока с решением

1)
var a, b: real;
begin
     readln(a, b);
     writeln('> ', a + b);
end.

2)
var x, y: real;
begin
     readln(x, y);
     writeln('> ', x / y);
end.

3)
var ab, cd: real;
begin
     readln(ab, cd);
     writeln('> ', ab * cd);
end.

Вот так, а program не обязательно, сейчас XXI век)