на языке ПаскальВвести 3 числа, 1 и 2 сложить, 3 и 1 разделить,результат вывести на экран.

programm xyz;
var a, b, c, d, e:real;
begin
a:=c+d;
writeln('Введите числа');
read (c, d);
writeln('Результат', a);
b:=e/c;
writeln('Введите число');
read (e);
writeln('Результат', b);
end.