forum.boolean.name - СРОЧНО! ПОМОГИТЕ!

forum.boolean.name (http://forum.boolean.name/index.php)

- Основной форум (http://forum.boolean.name/forumdisplay.php?f=49)

- - СРОЧНО! ПОМОГИТЕ! (http://forum.boolean.name/showthread.php?t=13316)

fantomkiller

10.09.2010 23:42

СРОЧНО! ПОМОГИТЕ!

Надо чтобы программа считала определенную функцию, ну там вводишь переменную А потом В и получаешь результат. будь это в паскале или С++ 5 минут бы заняло а так ищу инфу уже битй час и ничего вразумительного найти не могу. Напишите плиз исходник к А+В=С естественно чтобы А и В вводить при запуске программы и она выдавала С. Нужную функцию и кол-во переменных я уж сам поставлю. ПОМОГИТЕ плиз к утру надо((

IGR	11.09.2010 03:49

Ответ: СРОЧНО! ПОМОГИТЕ!

программист, пресни ф1 !!

Trazzy

11.09.2010 07:54

Ответ: СРОЧНО! ПОМОГИТЕ!

этот код можно значительно упростить, но все же:

PHP код:


		
			
program ProjectAZ;
var fld1, fld2, resl, rez, last1, last2: integer; 
    OKbtn, clicked: command;
 
procedure slozhenie;
begin
  ClearForm;
  ShowForm;
  OKbtn:=CreateCommand('OK', CM_SCREEN, 1);
  AddCommand(OKbtn);  
  SetFormTitle('Сложение'); 
  fld1:=formAddTextField('Введите A: ', integertostring(last1), 3, TF_NUMERIC);
  fld2:=formAddTextField('Введите B: ', integertostring(last2), 3, TF_NUMERIC);
  resl:=FormAddString('A+B='+integertostring(rez));
  repeat 
   clicked := GetClickedCommand; 
  until clicked <> EmptyCommand;
  last1:=stringtointeger(FormGetText(fld1));
  last2:=stringtointeger(FormGetText(fld2));
  rez:=last1+last2;
  slozhenie;
end;
 
begin
  slozhenie;
end.

fantomkiller

11.09.2010 16:48

Ответ: СРОЧНО! ПОМОГИТЕ!

Спасибо большое! Все сделал. У меня девушка просто работает в магазине, продает потолочные плитки. И ей сложно расчитывать сколько плиток надо на М2. Вот я и решил ей сделать програмку которая бы считала)

impersonalis

11.09.2010 17:20

Ответ: СРОЧНО! ПОМОГИТЕ!

блджад, раньше подвиги совершали для девушек, а теперь даже прогу не могут сами написать (да и ТЗ сформулировать). Напрягись - и RTFM

Tadeus

11.09.2010 20:56

Ответ: СРОЧНО! ПОМОГИТЕ!

Цитата:

Сообщение от impersonalis (Сообщение 161660)

Часовой пояс GMT +4, время: 10:27.