
24.01.2011, 14:44
|
Начинающий
|
|
Регистрация: 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;
|