Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Математика в Делфи

Автор: vovan430 24.8.2005, 09:38

Не получается как выглядит код чтоб edit1 был рвен корню квадратному из edit2 smile

КАК?

Автор: ChopAev 24.8.2005, 10:16

Код


var
a,b:string;
x,y:real;
z:integer;

begin
a:=edit2.text;
val(a,x,z);
y:=sqrt(x);
str(y,b);
edit1.text:=b;
end.

Попробуй так, только найди уж как вставить...

Автор: ~FoX~ 24.8.2005, 10:17

ИМХО проще:

Код


Edit1.Text := FloatToStr (sqrt(StrToFloat(Edit2.Text)));