Program ypaBHeHu9;
var
a,b,c:real; //известные величины
d:real; //дискрэменант
textField_id: integer;
begin
textField_id := FormAddTextField('Ввести коэффициенты a,b,c: ', 50, TF_NUMERIC);
showform;
delay(2000);
d := b*b-4*a*c; //дискрэменант
if d>0
then writeln('D>0 => Два корня: Меньший= ',(-b-sqrt(d))/2*a,', Больший= ',(-b+sqrt(d))/2*a)
else if d=0
then writeln('D=0 => Один корень: x=',-b/2*a)
else if d<0
then writeln('D<0 => Нет действительных корней');
readln;
end.
компилятор выделил ошибку в 7 строке(по writeln в 12-14-16 я не говорю), обозвал как: ошибка в параметре 2
собственно вопрос, а что за параметр? FormAddTextField ?
кстате, может кто-нибудь из просветлённых сможет проконсультировать меня в асике/мирке/<ещё где-нибудь> (на ваш выбор) ?