Паскаль - Помощь студентам

Просто человек · 16.02.2015, 19:20

Напишите пожалуйста программу к задачке

(Паскаль ABC)

Stilet · 16.02.2015, 19:48

Код:

var x,a,b,c:double;
begin
 x:=0;a:=0;b:=0;c:=0;
 a:=3.78*Cos(b-c)+exp(a*x);
 if a>0 then begin if x>0 then write('N=CosX') else write('L=Sinx'); end
 else  begin if b>1 then write('M=TgX') else write('K=e^ax'); end;
readln;
end.

Идея понятна?

Просто человек · 17.02.2015, 15:45

Спасибо большое)

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Паскаль ABC. Программа на языке Паскаль.	Helen1	Паскаль, Turbo Pascal, PascalABC.NET	6	13.01.2018 21:46
паскаль abc. Используя графические средства языка Паскаль на одной координатной сетке построить графики функций	кириллюк	Помощь студентам	5	15.09.2013 12:11
Как можно в Паскаль АВС (Паскаль-Турбо) вставлять в результаты печати программы графики, таблицы, схемы, набранные формулы, выраже	IZOPGRAM	Паскаль, Turbo Pascal, PascalABC.NET	0	11.06.2012 10:54
Паскаль, Борланд Паскаль-в чем разница???	Vremya-Dengy	Паскаль, Turbo Pascal, PascalABC.NET	13	31.05.2011 18:23
паскаль и турбо паскаль	Евгения Игоревна	Помощь студентам	6	05.05.2011 14:31

17.02.2015, 15:45	#3
Просто человек Пользователь Регистрация: 16.02.2015 Сообщений: 13	Спасибо большое)