Показать сообщение отдельно
  #3  
Старый 24.01.2011, 14:44
TotKtoNado TotKtoNado вне форума
Начинающий
 
Регистрация: 28.12.2010
Адрес: Сургут
Сообщения: 103
Версия Delphi: 2010
Репутация: -3238
По умолчанию

Цитата:
Сообщение от Hack M
Мой магический шар подсказывает что экстрасенсы не придут =(

По теме: давай код, посмотри, исправим...
Код:
begin
prsk:=strtofloat(edit26.text);
prsksum:=strtofloat(edit32.Text);
zatsk:=strtofloat(edit29.Text);
zatsksum:=strtofloat(edit11.Text);
label36.caption:=floattostr((prsk*prsksum)-(zatsk*zatsksum));
end;

объявил переменные
Код:
prsk,prsksum,zatsk,zatsksum:real;
Ответить с цитированием