Delphi 7. Линейные алгоритмы. - Помощь студентам

Юрий2009 · 30.04.2009, 17:48

Здравствуйте! Помогите, пожалуйста, составить программу. Задача напечатана вM.Word (Microsoft Equation 3.0). Заранее СПАСИБО!!!

DM_bite · 30.04.2009, 17:51

Код:

program Lin;
var x,y,rez: real;
begin
ReadLn(x,y);
rez:= 1+sin(sqrt(x+1))/cos(12*y-4);
WriteLn('Result:= ',rez);
ReadLn;
end.

30.04.2009, 17:51	#2
DM_bite Участник клуба Регистрация: 29.07.2008 Сообщений: 1,091	Код: `program Lin; var x,y,rez: real; begin ReadLn(x,y); rez:= 1+sin(sqrt(x+1))/cos(12y-4); WriteLn('Result:= ',rez); ReadLn; end.` Кто бы ты ни был - не думай о себе слишком (с)*

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Линейные Алгоритмы, Условный оператор (Delphi 7)	Olesya2406	Помощь студентам	1	30.04.2009 10:31
Delphi 7. Линейные алгоритмы.	Юрий2009	Помощь студентам	3	28.04.2009 18:52
Delphi 7. Линейные алгоритмы.	Юрий2009	Помощь студентам	2	27.04.2009 21:16
задачи по теме "Линейные алгоритмы" на Delphi 7	matrix8325	Помощь студентам	2	20.04.2009 22:53