Question

составьте листик программы Паскаль вычисляющий сумму трех дробных чисел

Answer 1

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.