По разделам



Задача For 30


Дано целое число N (> 1) и две вещественные точки на числовой оси:
A, B (A < B). Отрезок [A, B] разбит на N равных отрезков. Вывести H —
длину каждого отрезка, а также значения функции F(X) = 1 − sin(X) в
точках, разбивающих отрезок [A, B]:
F(A), F(A + H), F(A + 2·H), . . . , F(B).

Код (C/C++)

#include <bits/stdc++.h>
using namespace std;

int main() {
	srand((int)time(0));
	int N = rand() % 20 + 1;
	//N = 30;
	double A = (rand() % 100) / 10.0;
	double B = A + (rand() % 100) / 10.0;
	double H = (B - A) / N;
	
	cout << "A = " << A << endl;
	cout << "B = " << B << endl;
	cout << "N = " << N << endl;
	cout << fixed;
	cout << setprecision(4);
	cout << "H = " << H << endl;
	
	double x = A;
	double y;
	for(int i = 0; i <= N; i++) {
		y = 1 - sin(x);
		cout << x << " : " << y << endl;
		x += H;
	}
	
	return 0;
}

Код (Python)

import random
import math

B = random.randrange(-9,11)
A = random.randrange(-10,B)
N = random.randrange(2,11)

H = (B - A) / N
print("A = ",A)
print("B = ",B)
print("N = ",N)
print("H = {0:.2f}".format(H))

x = A
for i in range(0,N+1):
    y = 1 - math.sin(x)
    print("{0:.2f} : {1:.4f}".format(x,y))
    x += H
									

Код (Pascal)

program For30;
var
  A, B,H:Real;
  N, i :Integer;
begin
  Write('Введите N: ');
  Readln(N);
  Write('Введите A: ');
  Readln(A);
  Write('Введите B: ');
  Readln(B);
  H:=(B-A)/N;
  Writeln('Длинна отрезков равна: ',H);
  Writeln('Значения функции:');
  For i:=0  to N do Writeln('F(',A+i*h,')=',1-sin(A+i*h));
end.
									




For. Абрамян
For 1 Просмотров: 21
For 2 Просмотров: 17
For 3 Просмотров: 11
For 4 Просмотров: 19
For 5 Просмотров: 16
For 6 Просмотров: 14
For 7 Просмотров: 14
For 8 Просмотров: 13
For 9 Просмотров: 10
For 10 Просмотров: 14
For 11 Просмотров: 15
For 12 Просмотров: 22
For 13 Просмотров: 15
For 14 Просмотров: 16
For 15 Просмотров: 14
For 16 Просмотров: 14
For 17 Просмотров: 16
For 18 Просмотров: 16
For 19 Просмотров: 14
For 20 Просмотров: 11
For 21 Просмотров: 15
For 22 Просмотров: 13
For 23 Просмотров: 18
For 24 Просмотров: 13
For 25 Просмотров: 11
For 26 Просмотров: 13
For 27 Просмотров: 8
For 28 Просмотров: 21
For 29 Просмотров: 11
For 30 Просмотров: 8
For 31 Просмотров: 8
For 32 Просмотров: 9
For 33 Просмотров: 13
For 34 Просмотров: 9
For 35 Просмотров: 9
For 36 Просмотров: 13
For 37 Просмотров: 9
For 38 Просмотров: 17
For 39 Просмотров: 10
For 40 Просмотров: 8

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться