Найти значение функции для х от 0 до 16 с шагом 1. Написать в виде программы
10-11 класс
|
Если в верхней строчке не "-3,5", а просто 3,5, то тогда вот такая программа:
var
F:real;
x:integer;
begin
writeln(' x','F':6);
for x:=0 to 16 do
begin if x>=3.5 then F:=4*x*x+2*x-19
else F:=-2*x/(-4*x+1);
writeln(x:2,F:8:2);
end
end.
Мне кажется, в условии опечатка. Допустим, х=1. Тогда х>=-3,5 и х<1. Т.е. выполняется и первое, и второе условие. Такого быть не должно. Скорее всего, знака "минус" не должно быть.
Другие вопросы из категории
С клавиатуры вводится 3 числа, если сумма первого и последнего больше 10, то вывести эту сумму, если произведение больше 20, но меньше 30 (20>>30) то вывести это произведение, в противном случае вывести все эти 3 числа.
m:=14
n-m-3
m:n+m
write (m,n);
какие числа будут выведены на экран?
Читайте также
2)Найти количество всех нечетных чисел на интервале от 11 до 20
3)Найти сумму целых положительных четных чисел на интервале от 1 до 100
4)Найти сумму ряда,общий член которого равен А(х)=1/(3*N-2)*(3*N+1)
5)Дано произвольное число n≤100.Определить количество цифр в числе
ОЧЕНЬ НУЖНО!!НА ЯЗЫКЕ ПАСКАЛЬ!ВЫРУЧАЙТЕ!
до 3 S:=0 нц для j от 2 до 3 S:=S+i+j кц кц
ПОМОГИТЕ
сначала задаются,а затем меняются.
Нц для i от 0 до 10
А [ i ] := i
кц
Нц для i от 0 до 4
С := A[ i ]
A[ i ] := A [10 - i ]
A [10 - i ] :=C
кц
Чему будут равны элементы массива после выполнения фрагмента программы?
1) 10 9 8 7 6 5 4 3 2 1 0
2) 0 1 2 3 4 5 6 7 8 9 10
3) 10 9 8 7 6 5 6 7 8 9 10
4) 0 1 2 3 4 5 4 3 2 1 0
>0\end{cases}.
Функцию я построить сама смогла б,но я не знаю как туда это уравнение записать.можно ли его как -то упростить,чтоб все в одной строчке было.Вот фото уравнения на всякий случай,вдруг я его не правильно написала.Помогите пожалуйста.Тут в Excele надо работать