Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторные работы Программирование на языке высокого уровня.docx
Скачиваний:
3
Добавлен:
01.07.2025
Размер:
391 Кб
Скачать
☆

Задания для самостоятельной работы

Вариант

Номер задачи

I

1a, 2a, 3a

II

1b, 2b, 3b

III

1c, 2c, 3c

IV

1d, 2d, 3d

V

1e, 2a, 3a

VI

1f, 2b, 3b

VII

1g, 2c, 3c

VIII

1h,2d, 3d

IX

1a, 2a, 3a

X

1f, 2b, 3b

1. Найти сумму ряда с точностью 0.0001, используя для вычисления знаменателя функцию:

  1. S = + +...

  1. S = + +...

  1. S = + +...

  1. S = + +...

  1. S = + +...

  1. S = + +...

  1. S = + +...

  1. S = + +...

2. Найти площадь фигуры методом Монте-Карло.

a)

b)

y

y=x2

2

y=-0.5x2

x

c)

d)

3. Вычислить площадь криволинейной трапеции, ограниченной линиями: y=f(x), x=a; x=b (использовать метод трапеций, разбивая отрезок [a, b] на n равных частей.

  1. f(x)=-(x-3)2 +4, a=1, b=4, n=100, 200, 1000.

  2. f(x)=(x-4)2 , a=1, b=4, n=100, 500, 1000.

  3. f(x)=ln(x-1), a=2, b=4, n=100, 200, 1000.

  4. f(x)=|2cos x +1|, a=0, b=. n=100, 500, 1000.

Лабораторная работа 3 -4. Файлы и записи

I. Файлы

  1. Переписать из текстового файла f в файл g строки в перевернутом виде.

program example1;

var

f,g:text;

m:array[1..100] of string;

k,i:integer;

st,st1:string;

begin

assign(f,'input.dat');

reset(f);

k:=0;

while not eof(f) do

begin

readln(f,st);

k:=k+1;

st1:='';

for i:= 1 to length(st) do st1:= st[i]+st1;

m[k]:=st1;

end;

close(f);

assign(g,'output.dat');

rewrite(g);

for i:= 1 to k do writeln(g,m[i]);

close(g);

end.

Задания

  1. Даны текстовые файлы f1 и f2. Переписать с сохранением порядка следования компоненты файла f1 в файл f2, а компоненты файла f2 в файл f1. Использовать вспомогательный файл h.

  2. Дан текстовый файл f. Записать в файл g компоненты файла f в обратном порядке.

  3. Даны текстовые файлы f и g. Записать в файл h сначала компоненты файла f, затем - компоненты файла g с сохранением порядка.

  4. Дан файл f, компоненты которого являются целыми числами. Получить в файле g все компоненты файла f являющимися четными числами.

  5. Дан файл f, компоненты которого являются целыми числами. Получить файл g, образованный из файла f исключением повторных вхождений одного и того же числа.

  6. Дан файл f, компоненты которого являются целыми числами. Никакая из компонент файла не равна нулю. Файл f содержит столько же отрицательных чисел, сколько и положительных. Используя вспомогательный файл h, переписать компоненты файла f в файл g так, чтобы в файле g вначале шли положительные, затем отрицательные числа.

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

  8. Дан файл f, компоненты которого являются целыми числами. Записать в файл g наибольшее значение первых пяти компонент файла f, затем - следующих пяти компонент и т.д. Если в последней группе окажется менее пяти компонент, то последняя компонента файла g должна быть равна наибольшей из компонент файла f, образующих последнюю (неполную) группу.

  9. Дан символьный файл f подсчитать число вхождений в файл каждой из букв 'a','b','c','d', 'e','f' и вывести результат в файл g в виде таблицы  a --> Na b --> Nb c --> Nc  d --> Nd e --> Ne f --> Nf  где Na, Nb, Nc, Nd, Ne, Nf - числа вхождений соответствующих букв.

  10. Дан символьный файл f. Группы символов, разделенные пробелами (одним или несколькими) и не содержащие пробелов внутри себя, будем называть словами. Удалить из файла все однобуквенные слова и лишние пробелы. Результат записать в файл g.