Помогите составить задачу в паскаль, пожалуйста!!!
10-11 класс
|
Program asd;
Var f,x,l:real;
BEGIN
l:=ln(x);
Write('Введите х: '); ReadLN(x);
if x<=-7 then f:=ln(sqr(x)+9)
else
if (-7<x) and (x<=0) then F:=x/(sqr(x)-7)
else
f:=ABS(ln(x))+2*x;
Writeln('Ответ: ',f:2:2);
END.
Другие вопросы из категории
1) Чёрному
2) Не важно к какому: они одинаковые
3) Синему разъёму
4) Серому
1) Backspase
2) delete
3) enter
4) esc
оно загружается около часа(ютуб), возможно проблема в формате, подскажите как его переформатировать или что вообще сделать для ускоренной загрузки.
Читайте также
задачи на такую тему: Составление, ввод, трансляция и
исполнение программ, реализующих
циклические алгоритмы и типовые
операции с одномерными массивами
Имеется
массив А из N произвольных чисел (А(N)), среди которых есть положительные, отрицательные и
равные нулю. Используя оператор цикла, составить программу, выполняющую задачу:
двум приятелям родители подарили по новому мотоциклу .подростки поспорили кто быстрее пройдет обкатку двигателя 2500 км. первый проехал километры за 12 дней, а второй в первый день проехал 150 км, а в каждый следующий он прибавлял 20 км. нужно разрешить их спор и выявить кто сделал обкатку быстрее