1. Вычислить значение выражения по формуле (все переменные принимают действительные значения): .
2. Вычислить значение функции:
3. Написать программу, которая бы по введенному номеру единицы измерения (1-кг, 2-мг, 3-тонна, 5-центнер) и массе М выдавала бы соответствующее значение массы в кг.
4. Составить программу для вычисления значений функции на отрезке [a,b] с шагом h. Результаты представить в виде таблицы (1-ый столбец – значения аргумента, 2-ой – значения функции).
5. Дано натуральное число n и действительное число а. Вычислить .
6. Дан массив из 10 элементов. Получить 2 массива: 1-ый - четные числа уменьшить на произведение пятидесятого и последнего элементов, 2-ой - числа, стоящие на нечетных местах увеличить на максимальный элемент исходного массива.
7. В заданном одномерном массиве поменять местами соседние элементы, стоящие на четных местах, с элементами, стоящими на нечетных местах.
8. Сформировать квадратную матрицу порядка n по заданному образцу: .
9. Заданы матрица порядка n и число k. Разделить элементы k-й строки на диагональный элемент, расположенный в этой строке.
program p19;
const n=10;
var f:file of integer;
h,k,i,j:integer;
a:array [1.n] of integer;
begin
assign(f,'file99.dat');
rewrite(f);
randomize;
for i:=1 to n do
begin
a[i]:=random(10)-4;
write(f,a[i]);
end;
close(f);
k:=0;
for i:=1 to n do write(a[i],' ');
for i:=1 to n-1 do
for j:=i+1 to n do
if (a[i]=-a[j])and(a[i]<>0) then begin k:=k+1;
for h:=1 to n do if a[h]=abs(a[j]) then a[h]:=-100; end;
writeln ('kol-vo=',k);
end.
var
f1,f:text;
q,i,j:integer;
q1:array[1.100] of string[20];
begin
assign(f,'assort2.txt');
reset(f);
repeat
i:=i+1;
readln(f,q1[i]);
until eof(f);
close(f);
for q:=1 to 9 do writeln(q1[q]);
for q:=1 to 9 do
for j:=q+1 to 10 do
if q1[q]=q1[j] then q1[q]:='';
writeln('_');
for q:=1 to 10 do writeln(q1[q]);
readln;
end.
К работе прилагается все исходники.
Задача/Задачи:
Задача по метрологии и стандартизации
Дипломная работа:
Анализ языкового выражения концепта «любовь» в немецком и английском языках на уроках иностранного языка
Дипломная работа:
Методическое обеспечение лекционных занятий по курсу «математические методы для экологов»
Курсовая работа:
Методы половинного и шагового деления Microsoft Excel, MathCAD, Pascal
Контрольная работа:
задачи по информатике БГПУ (ОТИ)
