Цитата:
Сообщение от Radist61
Вот вчера дали еще две(последние):
1)Написать программу которая бы при вводе с клавиатуры значения "х" находила бы "у" по формулам:если "х" меньше или равен нулю то y=sin(x2) а если значение вводимого "х" больше нуля тогда y=sin2(x). Двойки в формулах это степени.
|
Код:
VAR
x:REAL;
BEGIN
Write('x= ');
ReadLn(x);
Write('y= ');
If x>0 then WriteLn(SQR(Sin(x))) else WriteLn(Sin(SQR(x)));
ReadLn;
END.
Сейчас вторую сделаю.