среда, 4 марта 2020 г.

переменные в лазарус

на

var xxx, kot, otv: real;
begin
   xxx:=StrToFloat(Edit1.Text);
   kot:=StrToFloat(Edit2.Text);
   otv:=xxx+kot;
   Edit3.Text:=FloatToStr(otv); 
Автор: на
Share this article :

0 коммент.:

Отправить комментарий

Подписаться на: Комментарии к сообщению (Atom)