Информатика. Написать программу нахождения произведения трех чисел а,в,с вводится с клавиатуры.

в делфи:
var a,b,c,d:real;
begin
a:=FloatToStr(Edit1.Text);
b:=FloatToStr(Edit2.Text);
c:=FloatToStr(Edit3.Text);
d:=a*b*c;
Edit4.Text:=StrToFloat(d);
end;

в паскале:
var a,b,c,d:real;
begin
writeln('введите числа');
readln(a,b,c,);
d:=a*b*c;
writeln('=');
readln(d);
end;

Ну, во-первых, на каком языке?
На Паскале, к примеру, выглядит вот так:
program 1;
var a, b, c: Real; // ну или Integer, если только целые
d: Real;
begin
Write ('Введите a:'); Readln (a);
Write ('Введите b:'); Readln (b);
Write ('Введите c:'); Readln (c);
d:=a*b*c;
Writeln ('Произведение a*b*c=',d);
end.