Составить программу вычисляющую значение функции

Составить программу вычисляющую значение функции

Пример 1.

Составить программу расчета значения функции.

Z = |cos х 4 – 3 tg х 2 |+0.8 sin yх 2 + 10 при любых значениях х и у. Результат вывести в виде: при х= и у=… z=…

Решение:

writeln(‘введите X Y’);

Результат:

при x=1.00 y=2.00 z=11.59

Пример 2.

Вводится вещественное число а. Не пользуясь никакими арифметическими операциями, кроме сложения, получить 7а за четыре операции.

Решение:

Результат:

Пример 3.

Найти площадь круга и длину окружности.

Решение:

write(‘введите радиус окружности ‘);

writeln(‘длина окружности= ‘,d:4:2);

writeln(‘площадь окружности= ‘,s:4:2);

Результат:

введите радиус окружности 5

Пример 4.

Вычисление суммы цифр введенного натурального двузначного числа.

Решение:

Var n, a, b: integer;

Результат:

Пример 5.

Введенное 4-значное число изменить так, чтобы 2 и 3 цифры поменялись местами.

Решение:

b:=n div 100 mod 10;

c:=n div 10 mod 10;

Результат:

Пример 6.

Обмен значениями переменных x и y.

Решение:

Var x,y,t: integer;

write(‘Введите x y ‘); readln(x,y);

Результат:

Введите x y 3 7

Пример 7.

Вычислить значение y = (3tg x 2 – e x )/2sin x для х = -34, 0.89, 1.23

Решение:

Результат:

при x=34.00 y=-551389941339996.31

1. Составить программу расчета значения функции
Z = |3 е х +3 – 2 ln ху| + 1,8х 2 + 1 при любых значениях х и у. Результат вывести в виде: при х= … и у=… z=…

2. Составить программу расчета значения функции
Z = tg х 3 – |2 sin х 2 у + 7.8 cos х |+ 10 при любых значениях х и у. Результат вывести в виде: при х= … и у=… z=…

3. Составить программу расчета значения функции
Z = (х 4 – 2 ctg х 2 у 2 )/| 8х 2 – 5 arctg у| при любых значениях х и у. Результат вывести в виде: при х= … и у=… z=…

4. Составить программу расчета значения функции
Z = tg х 5 – 21 ctg ху 2 /(18 sin х – 13 cos у + 11) при любых значениях х и у. Результат вывести в виде: при х= … и у=… z=…

5. Составить программу расчета значения функции
Z = (2e х -4 – |sin х 2 у| )/( 2.1ctg х 2 + 10.2) при любых значениях х и у. Результат вывести в виде: при х= … и у=… z=…

6. Вводится вещественное число а. Не пользуясь никакими арифметическими операциями, кроме умножения, получить a 4 за две операции.

Читайте также:  Крутые фотки на инстаграм для пацанов

7. Вводится вещественное число а. Не пользуясь никакими арифметическими операциями, кроме умножения, получить a 6 за три операции.

8. Вводится вещественное число а. Не пользуясь никакими арифметическими операциями, кроме умножения, получить a 7 за четыре операции.

9. Вводится вещественное число а. Не пользуясь никакими арифметическими операциями, кроме умножения, получить a 8 за три операции.

10. Вводится вещественное число а. Не пользуясь никакими арифметическими операциями, кроме умножения, получить a 9 за четыре операции.

11. Вводится вещественное число а. Не пользуясь никакими арифметическими операциями, кроме умножения, получить a 10 за четыре операции.

12. Вводится вещественное число а. Не пользуясь никакими арифметическими операциями, кроме сложения, получить 6a за три операции.

13. Найти произведение цифр введенного 4-значного числа.

14. Найти сумму цифр введенного 4-значного числа.

15. Определить сумму квадратов цифр введенного 3-значного числа.

16. Введено 3-значное число. Вывести число в зеркальном отображении.

17. Введено 3-значное число. Вывести число в зеркальном отображении

18. Введенное 4-значное число изменить так, чтобы 1 и 4 цифры поменялись местами.

19. Найти среднее арифметическое цифр введенного 3-значного числа.

20. Введено 3-значное число. Поменять местами 1-ю и 3-ю цифры числа.

21. Введенное 4-значное число изменить так, чтобы 1-3 и 2-4 цифры поменялись местами.

22. Найти полусумму цифр введенного 4-значного числа.

23. Определить сумму квадратов цифр введенного 3-значного числа.

24. Введенное 4-значное число изменить так, чтобы 1 и 3 цифры поменялись местами.

25. Введенное 4-значное число изменить так, чтобы 3 и 4 цифры поменялись местами.

II. ОПЕРАТОРЫ ВЫБОРА И УСЛОВНОГО ПЕРЕХОДА.

операторы:

Оператор Назначение Синтаксис
if … then… проверка условий if then else if then
case выбор case of : ; … : [else ] end;

примеры решения задач:

Не нашли то, что искали? Воспользуйтесь поиском:

Лучшие изречения: Только сон приблежает студента к концу лекции. А чужой храп его отдаляет. 9190 — | 7798 — или читать все.

Уроки программирования, алгоритмы, статьи, исходники, примеры программ и полезные советы

ОСТОРОЖНО МОШЕННИКИ! В последнее время в социальных сетях участились случаи предложения помощи в написании программ от лиц, прикрывающихся сайтом vscode.ru. Мы никогда не пишем первыми и не размещаем никакие материалы в посторонних группах ВК. Для связи с нами используйте исключительно эти контакты: vscoderu@yandex.ru, https://vk.com/vscode

Читайте также:  Рыбалка garmin striker plus 4

Программа, вычисляющая значение функции

В сегодняшнем уроке будет написана и рассмотрена программа, вычисляющая значение функции. Разработку будем вести на языке Си. Значение функции будет вычислять подпрограмма; с помощью неё мы решим типовую вычислительную задачу, которую удобно запрограммировать для вычисления на компьютере.

Изучение программирования на примерах многие авторы считают очень эффективным, и мы, в рассмотрении данного вопроса, поступим также. Поэтому решим типовую задачу.

Задание. Вычислить сумму:

Перейдем к написанию программы, решающей данную задачу. Сначала подключим необходимые заголовочные файлы, функции которых понадобятся для вывода результата в консоль и для математических расчетов соответственно:

Билет 1.

1.Составить программу определения катета прямоугольного треугольника по известным значениям гипотенузы и второго катета В..

writeLn(‘wwedite znachenia b,c’);

Разработать программу вычисления функции

writeln(‘wwedite znachenia x’);

Билет 2.

Составить программу вычисления объема полого цилиндра с внешним радиусом R и внутренним r. Высота цилиндра H.

writeLn(‘wwedite znachenia r,n,h’);

Ввести с клавиатуры 3 числа, найти среди них наименьшее. Предусмотреть выводы данных на дисплей.

writeln(‘wwedite znachenia k,l,m’);

if (k=l)and(k=m)and(l=m) then writeln(‘m=l=k=’,m:10:3) else

if j=0 then writeln(‘no cisel’);

Билет 4.

1.Составить программу для определения площади поверхности цилиндра с радиусом основания R и высотой H.

writeLn(‘wwedite znachenia r,h’);

Ввести с клавиатуры 7 чисел. Вывести на дисплей четные и нечетные числа, указать число четных и нечетных чисел.

a:array [1..7] of real;

if frac(st)=0 then

if frac(st)<>0 then

Билет 5

1.Составить программу для определения расстояния на плоскости между двумя точками М1(х1, у1) и М2(х2, у2).

Ввести с клавиатуры 8 чисел. Найти их среднее значение. Найти числа большие среднего значения и меньшие среднего значения, подсчитать количество тех и других. Предусмотреть выводы данных на дисплей.

a:array [1..8] of real;

writeln(‘kol-vo chisel > st=’,j);

writeln(‘chisla =a[i] then min:=a[i];

if max =a[i] then min:=a[i];

if max min)and(a[i] =0 then

else writeLn(‘resheniy net’);

Билет 9-10

Ввести с клавиатуры три пары чисел. Определить сумма какой из пар чисел больше. Предусмотреть выводы данных на дисплей.

a:array [1..3,1..2] of real;

if a[i,1]+a[i,2]>max then

writeln(‘max summa=’,max:10:3 ,’ nomer par ‘,k);

Билет 11.

Ввести с клавиатуры три пары чисел. Найти произведение каждой пары и определить какое из них минимально. Предусмотреть выводы данных на дисплей.

Читайте также:  Виртуальная машина программа бесплатно

a:array [1..3,1..2] of real;

var a,b,c,d,x1,x2 :real;

else writeLn(‘resheniy net’);

2. Вычислить функцию у = Sin 3х (-3p -3n)and(x 2 — 8Sinх (-2 3). Найти ее минимум и максимум. Вывести в виде таблицы результаты вычислений.

if min>y then min:=y;

С клавиатуры задается последовательность чисел. Найти сумму чисел, предшествующих первому отрицательному в задаваемой последовательности. Вывести сумму чисел, а также те из них, которые лежат в интервале от 1 до 5. Найти число таких чисел.

a:array [1..20] of real;

for i:=1 to 20 do

write(‘wwedite element posledovatelnost a[‘,i:2,’]=’);

for i:=1 to 20 do

if (a[i]>1)and(a[i] -3n)and(x -n)and(x y;

writeln(‘cherez ‘,i:2,’ dnya’);

Билет 26

1. Вычислить функцию у = 2х 2 — 6Sinх (-2 3). Найти ее минимум и максимум. Вывести таблицу функции.

if min>y then min:=y;

2. Составить таблицу степеней числа 3: 3n, n=1, 2, 3. i Прекращать печатать таблицу, когда 3n превысит заданное число D. Вычисления проводить не используя операцию возведения в степень.

write(‘chislo stepen kotorogo ishem ‘);

Билет 27.

1. Задать двумерный массив размером 4*3. Просуммировать элементы его столбцов. Результаты представить в виде одномерного массива размером 3. Вывести исходный массив в виде таблицы, полученный в виде строки.

a:array [1..4,1..3] of real;

b:array [1..4] of real;

2. В очередном году урожайность ячменя составила 20ц с гектара. В среднем каждые два года урожайность увеличивается на 5%. Определить через сколько лет урожайность превысит Nц с га.

writeln(‘uroshay 1 goda’);

writeln(‘cherez ‘,i:2,’ god’);

Билет 28

1. Задать двумерный массив размером 4*4. Вывести массив в виде таблицы. Предусмотреть вывод элементов задаваемого столбца и задаваемой строки массива.

a:array [1..4,1..4] of real;

2. Среди последовательности чисел 1, 1+1/2, 1+1/2+1/3, . . . найти первое , большее заданного числа а. Вывести на экран само число и его номер.

program bil282;

label 1;

var x,a:real;

i,j:integer;

Begin

write(‘wwedite x=’);

readln(x);

write(‘wwedite ogranichenie a=’);

readln(a);

j:=1;

for i:=2 to 100 do

Begin

x:=x+(1/i);

j:=j+1;

if x>a then goto 1;

end;

1: writeln(‘chislo x>a =’,x:10:5);

writeln(‘nomer chisla ‘,j);

End.

Билет 29.

1. Задать двумерный массив размером 5*5. Вывести массив в виде таблицы. Предусмотреть вывод элементов задаваемого столбца и задаваемой строки массива.

Ссылка на основную публикацию
Сколько рублей получают ютуберы
Видеохостинг YouTube — не только развлекательная площадка, но и хороший источник дохода. Тысячи пользователей выкладывают ролики, пытаясь привлечь внимание аудитории....
Самый дорогой самсунг 2018
Samsung / Самсунг - южнокорейская компания, ведущий производитель смартфонов в мире. В первом квартале 2018 года доля Самсунг на мировом...
Самый лучший smart tv
Ежегодные обновления телевизионных технологий делают телевизоры уже больше, чем обычным экраном для демонстрации каналов. Растет популярность функции Smart TV, которая...
Сколько света мотает компьютер
Выбирая комплектующие для персонального компьютера (ПК) обычно обращают внимание на производительность и объем памяти, порой забывая о том, сколько же...
Adblock detector