Составьте листик программы Паскаль вычисляющий сумму трех дробных чисел
program name; uses crt; var a,b,c,d: real; begin clrscr; writeln('Введите три дробных числа'); readln(a,b,c); d:=a+b+c; write('Cумма этих чисел: ',d:3:2); readln; end.