Другие вопросы по теме Информатика
sharshukovauly
28.09.2019 04:00
PASHA993r
28.09.2019 04:00
143General
28.09.2019 03:50
Naati14pr
28.09.2019 03:50
lizakaraseva0
28.09.2019 03:50
Kot2351
28.09.2019 03:50
Yuiyuii
28.09.2019 03:50
datskivvera1
28.09.2019 03:40
Популярные вопросы
- Найдите координаты центра окружности, заданной уравнением х²+у²+4у-2х=0...
3 - Сочинение на тему летняя ночь со словам тишь,глушь,ночь,полночь,сыч,камыш,рожь,дрожь....
1 - На левой чашке весов. находится 5 качан.капуст.с один.массой и...
1 - Длина основания равнобедренного треугольника составляет 40% от...
2 - Решить уравнение! sin²x+2sinx•cosx=3cos²x...
1 - 1.решить уравнение: log5(2x-1)=2 5 - основание. 2.решить неравенство:...
3 - Реште уравнение: а)х^3+4x^2-32x=0 б)x^3-10x^2+4x-40=0...
1 - Вставьте пропущенные слова: ароматическими называются углеводороды,...
3 - Больше всего надо боятся равнодушных людей.как вы понимаете согласны...
3 - Какие единицы измерения надо соблюдать, чтобы в результате получить...
1
//pascal
var
y,x : real;
begin
write('x=');
readln(x);
if x > 15 then
y := 9 * x + 3*x*x
else if x <= 15 then
y := 3*x - 5 * sqrt(x+28);
writeln('y = ',y:5:2);
end.