Показать сообщение отдельно
Старый 02.02.2010, 21:59   #6
Protey
Оператор ЭВМ
 
Аватар для Protey
 
Регистрация: 02.02.2010
Сообщений: 37
Написано одно полезное сообщение
(для 2 участников)
Ответ: Перевод кода Pascal abc в код MidletPascal

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 ?

кстате, может кто-нибудь из просветлённых сможет проконсультировать меня в асике/мирке/<ещё где-нибудь> (на ваш выбор) ?
(Offline)
 
Ответить с цитированием