Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Помогите решить задачи , пожалуйста! Паскаль!

71K
24 июня 2011 года
AnyaPonomareva
2 / / 24.06.2011
7. Дано A0=cos(в квадрате)1; A1=-sin(в квадрате)1;Aк=2Ak-1 - Ak-2; K=2,3,... Найти сумму квадратов тех чисел a1, …, a100, которые не превосходят двух.
_____________
9. Даны действительные числа a, b (a < b), натуральное число n, функ-ция у = f(x), определенная на отрезке [а, b]. Для значений аргумента xi = a+ih (i = 0, 1, ..., n), h=(b – а)/n вычислить значения функции yi=f(xi) (i = 0, 1, ..., n). Вывести хi и уi (i = 0, 1, ..., n) в виде таблицы из двух колонок. В i-ю строку таблицы заносятся соответствующие значения хi и уi. Рассмотреть следую функцию:у =корень х(в квадрате)+2 , а = –3, b = 5, n = 40;
________________
10.Рассматривается последовательность a1, …, a1000. Требуется определить, сколько членов последовательности с номерами 1, 2, 4, 8, 16, ... имеют значение, меньшее, чем 0.25. При этом считать, что a1, …, a1000 – заданные действительные числа;
____________________
73K
25 июня 2011 года
Static - X
2 / / 18.06.2011
10.Рассматривается последовательность a1, …, a1000. Требуется определить, сколько членов последовательности с номерами 1, 2, 4, 8, 16, ... имеют значение, меньшее, чем 0.25. При этом считать, что a1, …, a1000 – заданные действительные числа;
____________________[/QUOTE]

[HTML]
var
A: array[1..1000] of Real;
i: Integer;
kol: Integer;
begin
kol:= 0;
i:= 1;

repeat
if (A < 0.25) then
Inc(kol);
i:= i*2;
until (i > 1000);
end;
[/HTML]
73K
25 июня 2011 года
Static - X
2 / / 18.06.2011
9. Даны действительные числа a, b (a < b), натуральное число n, функ-ция у = f(x), определенная на отрезке [а, b]. Для значений аргумента xi = a+ih (i = 0, 1, ..., n), h=(b – а)/n вычислить значения функции yi=f(xi) (i = 0, 1, ..., n). Вывести хi и уi (i = 0, 1, ..., n) в виде таблицы из двух колонок. В i-ю строку таблицы заносятся соответствующие значения хi и уi. Рассмотреть следую функцию:у =корень х(в квадрате)+2 , а = –3, b = 5, n = 40;
[/QUOTE]

[HTML]
const
a = -3;
b = 5;
n = 40;
var
y, x: Real;
i: Integer;
h: Real;
begin
h:= (b-a) / n;

for i:= 0 to n do
begin
x:= a + i*h;
y:= Sqrt(Sqr(x)+2);
Writeln(x, ' ', y);
end;
end;
[/HTML]
366
27 июня 2011 года
int
668 / / 30.03.2005
Это раздел про web-программирование? Как мне приготовить борщ на костре?
73K
27 июня 2011 года
Static-X-00
1 / / 21.06.2011
Цитата: int
Это раздел про web-программирование? Как мне приготовить борщ на костре?


 
Код:
Ха-Ха-Ха. Ты кажется заблудился. Здесь не готовят борщ.
366
28 июня 2011 года
int
668 / / 30.03.2005
Пример про kde2 под фряху несколько банален. Да и юмор там был построен на том, что все анимешники - линуксоиды/юниксоиды. А тут так сразу не подберёшь ничего подходяшего.
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог