Задачи на тему: Основные приемы программирования icon

Задачи на тему: Основные приемы программирования


1 чел. помогло.

Смотрите также:
Учебник для вузов...
Лабораторная работа №2 по Информатике и икт на тему «Язык программирования Паскаль...
Учебная программа Дисциплины б8 «Языки программирования» по специальности 090302 «Информационная...
Политический дискурс в системе функциональных стилей 10 глава II...
Учебная программа по дисциплине программирование маслянкин В. И...
«Объекты языка программирования Turbo Pascal 0»...
Решение задачи линейного программирования в ms...
Темы вашего учебного проекта...
Основы алгоритмизации и программирования (11 ч)...
Полный обучающий курс Turbo Pascal Содержание Ввод-вывод 4 Занятие Язык программирования Паскаль...
Краснер Н. Я., Пастухов А. И., Щепина И. Н...
Программа дисциплины "Технологии интерактивных систем" Направление...



скачать


Министерство образования Российской федерации


Ростовский ордена Трудового Красного Знамени

государственный университет


Н.И. Амелина, Я.М. Русанова, А.А. Чекулаева


Информатика. Задачи.


Часть 1 а

Задачи на тему:

Основные приемы программирования


Методические указания для студентов дневного и вечернего отделений механико-математического факультета


Ростов - на - Дону

2005

Печатается по решению

кафедры прикладной математики и программирования

механико-математического факультета РГУ

от 17.11.2004 (протокол № 3).


АННОТАЦИЯ


Методические указания содержат набор задач, предназначенных для отработки основных приемов программирования при работе с данными простых типов и реализации алгоритмов различной структуры.

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


Авторы: Н.И. Амелина, Я.М. Русанова, А.А. Чекулаева


© Н.И. Амелина, Я.М. Русанова, А.А. Чекулаева, 2005


СОДЕРЖАНИЕ


  1. Простейшие программы. Оператор присваивания. Операторы ввода-вывода. Арифметика вещественных чисел. Вычисления по формулам Error: Reference source not found

  2. Простейшая целочисленная арифметика Error: Reference source not found

  3. Логический тип. Разветвления. Условный оператор. Селективный оператор. Составной оператор. Error: Reference source not found

  4. Операторы цикла. Вложенные операторы цикла Error: Reference source not found

  5. Вычисления с заданной точностью Error: Reference source not found

  6. Символьный тип. Обработка последовательностей символов Error: Reference source not found

  7. Литература 32




  1. Простейшие программы. Оператор присваивания.

      Операторы ввода-вывода. Арифметика вещественных чисел

      Вычисления по формулам


^ Пример вычисления y по формуле:

y:=(sqrt(x)*sin(x))/(x+exp(x))


Программа, которая вычисляет площадь треугольника по формуле Герона.

Program GERON;

Var a, b, c :real; {стороны треугольника}

p :real; {полупериметр треугольника}

s : real; {площадь треугольника}

begin

writeln(‘Вводите длины треугольника’);

write(‘a=’); readln (a);

write(‘b=’); readln (b);

write(‘c=’); readln (c);

p:=(a+b+c)/2;

s:=sqrt(p*(p-a)*(p-b)*(p-c));

writeln(‘Площадь треугольника равна’, s:10:3)

end.


    1. Написать программы вычисления y по формулам:



























































    1. Поменять местами содержимое переменных A и B, используя вспомогательную переменную.

    2. Написать программы для решения следующих задач:

  1. Дана длина ребра куба. Найти объем куба и площадь его поверхности.

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

  3. Вычислить периметр и площадь прямоугольного треугольника по длинам двух катетов.

  4. Вычислить среднее арифметическое и среднее геометрическое двух положительных чисел.

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

  6. Найти площадь кольца, внутренний радиус которого равен R1, а внешний радиус равен R2.

  7. Смешано v1 литров воды температуры t1 с v2 литрами воды температуры t2. Найти объем и температуру образовавшейся смеси.

  8. Вычислить расстояние от точки плоскости с координатами (x, y) до границы круга единичного радиуса с центром в начале координат. Расстояние между двумя точками с заданными координатами (x1,y1) и (х2,y2) на плоскости вычисляется по формуле ;

  9. Для двух заданных вещественных чисел вычислить коэффициенты приведенного квадратного уравнения, корнями которого являются эти числа.

  10. Вычислить периметр и площадь правильного шестиугольника, вписанного в окружность заданного радиуса.

  11. По длинам двух сторон треугольника и углу (в градусах) между ними вычислить длину третьей стороны и площадь этого треугольника.

  12. По заданным длинам трех сторон треугольника вычислить длины его высот, медиан и биссектрис.

  13. Найти координаты точки, делящей в отношении n1:n2 отрезок, заданный координатами своих концов.

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

    1. Дано число A. Вычислить:

  1. A4, используя две операции умножения;

  2. A6, используя три операции умножения;

  3. A7, используя четыре операции умножения;

  4. A8, используя три операции умножения;

  5. A8, используя три операции умножения;

  6. A9, используя четыре операции умножения;

  7. A10, используя четыре операции умножения;

  8. A13, используя пять операций умножения;

  9. A21, используя шесть операций умножения;

  10. A28, используя шесть операций умножения;

  11. A64, используя шесть операций умножения.

    1. Дано число A. Вычислить:

  1. A3 и A10 за четыре операции;

  2. A4 и A20 за пять операций;

  3. A5 и A13 за пять операций;

  4. A5 и A19 за пять операций;

  5. A2, A5 и A17 за шесть операций;

  6. A4, A12 и A28 за шесть операций.




  1. Простейшая целочисленная арифметика


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

Program DIGIT;

Var a :integer; {исходное число}

b :integer; {цифра}

begin

writeln(‘Введите число’);

write(‘a=’); readln (a);

b:=a mod 10;

writeln(‘Последняя цифра равна ’, b)

end.


    1. Дано расстояние L в сантиметрах. Вывести число полных метров в нем.

    2. Дан размер файла в байтах. Вывести число полных килобайтов (мегабайтов), которые занимает данный файл.

    3. Дано время N в секундах. Найти число полных минут, часов, суток в нем.

    4. Даны целые числа A, B и C. Найти количество квадратов со стороной C, которое можно разместить на прямоугольнике размера A на B.

    5. Дано двузначное число. Вывести вначале его правую цифру, потом – левую.

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

    7. Дано двузначное число. Найти произведение и сумму цифр этого числа.

    8. Дано трехзначное число. Найти произведение и сумму цифр этого числа.

    9. Дано трехзначное число. Поменять местами его крайние цифры.

    10. Дано трехзначное число. В нем зачеркнули первую слева цифру и приписали ее справа. Вывести полученное число.

    11. Дано трехзначное число. В нем зачеркнули первую справа цифру и приписали ее слева. Вывести полученное число.

    12. Дано трехзначное число. Вывести число, полученное при перестановке цифр сотен и десятков исходного числа.

    13. Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц исходного числа.

    14. Для заданного целого четырехзначного числа написать программы решения следующих задач:

  1. вычислить произведение (сумму) цифр числа;

  2. вычислить разность (частное) между суммой (произведением) крайних и средних цифр числа;

  3. получить число, содержащее цифры данного числа в обратном порядке;

  4. вычислить сумму (произведение) квадратов (кубов) цифр числа;

  5. вычислить среднее арифметическое (геометрическое) цифр числа.




  1. Логический тип. Разветвления. Условный оператор. Селективный оператор. Составной оператор.


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




Program RAZVETVLENIYA;

Var a, b, y, x : real;

begin

write (‘Введите значение переменной a=’); readln(a);

write (‘Введите значение переменной b=’); readln (b);

if a=b then y:=0.25

else

begin

x:=a*a+b*b;

if a>b then y:=2.0 else y:=x/2.0

end;

writeln (‘y=’,y)

end.


Программа для решения следующей задачи: если целое число a является положительным, то вывести true, иначе вывести false.


Program BOOLEAN1;

Var a: integer;

b: boolean;

begin

write (‘Введите значение переменной a=’); readln(a);

b:= a>0;

writeln (‘b=’,b)

end.


^ Пример использования селективного оператора:

Program SELECTIVE;

Var i : integer;

begin

write (‘Введите значение переменной i=’); readln(i);

case i of

0,2,4,6,8: writeln(‘четная цифра’);

1,3,5,7,9: writeln(‘нечетная цифра’);

10..100: writeln(‘число от 10 до 100’)

else writeln(‘отрицательное число или больше 100’)

end.


    1. Даны два целых числа: А, В. Проверить истинность высказывания: «Справедливы неравенства А > 2 и В < 3»

    2. Даны три целых числа: А, В, С. Проверить истинность высказывания: «Справедливо двойное неравенство А < В < С».

    3. Даны два целых числа: А, В. Проверить истинность высказывания: «Каждое из чисел А и В нечетное».

    4. Даны два целых числа: А, В. Проверить истинность высказывания: «Ровно одно из чисел А и В нечетное».

    5. Даны три целых числа: А, В, С. Проверить истинность высказывания: «Каждое из чисел А, В, С положительное».

    6. Даны три целых числа: А, В, С. Проверить истинность высказывания: «Ровно одно из чисел А, В, С положительное».

    7. Дано целое положительное число. Проверить истинность высказывания: «Данное число является четным двузначным».

    8. Проверить истинность высказывания: «Среди трех данных целых чисел есть хотя бы одна пара совпадающих».

    9. Проверить истинность высказывания: «Все цифры данного трехзначного числа различны».

    10. Проверить истинность высказывания: «Цифры данного трехзначного числа образуют возрастающую или убывающую последовательность».

    11. Даны числа х, у. Проверить истинность высказывания: «Точка с координатами (х, у) лежит во второй координатной четверти».

    12. Даны числа х, у. Проверить истинность высказывания: «Точка с координатами (х, у) лежит во второй или третьей координатной четверти».

    13. Даны целые числа а, b, с, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами а, b, с является равносторонним»

    14. Даны координаты двух различных полей шахматной доски х1,у1,х2,y2 (целые числа, лежащие в диапазоне 1-8). Проверить истинность высказывания: «Ладья за один ход может перейти с одного поля на другое»

    15. Даны координаты двух различных полей шахматной доски х1,у1, x2,y2 (целые числа, лежащие в диапазоне 1-8). Проверить истинность высказывания: «Слон за один ход может перейти с одного поля на другое».

    16. Даны целые числа а, b, с. Проверить истинность высказывания: «Существует треугольник со сторонами а, b, с».

    17. Даны целые числа а, b, с, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами а, b, с является прямоугольным».

    18. Даны целые числа а, b, с, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами а, b, с является равнобедренным».

    19. Даны числа х, у. Проверить истинность высказывания: «Точка с координатами (х, у) лежит в первой или третьей координатной четверти».

    20. Проверить истинность высказывания: «Данное четырехзначное число читается одинаково слева направо и справа налево».

    21. Даны числа х, у. Проверить истинность высказывания: «Точка с координатами (х, у) лежит в четвертой координатной четверти».

    22. Проверить истинность высказывания: «Цифры данного трехзначного числа образуют возрастающую последовательность».

    23. Проверить истинность высказывания: «Среди трех данных целых чисел есть хотя бы одна пара взаимно противоположных».

    24. Дано целое положительное число. Проверить истинность высказывания: «Данное число является нечетным трехзначным».

    25. Даны три целых числа: А, В, С. Проверить истинность высказывания: «Ровно два из чисел А, В, С являются положительными».

    26. Даны три целых числа: А, В, С. Проверить истинность высказывания: «Хотя бы одно из чисел А, В, С положительное».

    27. Даны два целых числа: А, В. Проверить истинность высказывания: «Числа А и В имеют одинаковую четность».

    28. Даны два целых числа: А, В. Проверить истинность высказывания: «Хотя бы одно из чисел А и В нечетное».

    29. Даны три целых числа: А, В, С. Проверить истинность высказывания: «Число В находится между числами А и С».

    30. Даны два целых числа: А, В. Проверить истинность высказывания: «Справедливы неравенства А > 0 или В < -2».

    31. Использовать селективный оператор для решения следующих задач:

a)

b)




    1. Написать программы вычисления y по формулам:

a)

b)

c)

d)

e)

    1. Найти корни квадратного уравнения ax2+bx+c=0.

    2. Решить уравнение ax4+bx2+c=0 при всех возможных значениях a, b, c.

    3. Определить максимальное значение по абсолютной величине из трех заданных чисел a, b, c.

    4. Упорядочить по возрастанию последовательность трех чисел a, b, c.

    5. Выяснить, поместится ли круг площади S1 в квадрат площади S2.(Диаметр меньше стороны квадрата.)

    6. Переменной k присвоить номер четверти плоскости, в которой находится точка с заданными координатами x и y (x, y≠0).

    7. Выяснить, можно ли из отрезков с длинами a, b, c построить треугольник, и определить тип треугольника.

    8. Элементы прямоугольного равнобедренного треугольника задаются в зависимости от указанного номера варианта. В первом варианте вводится катет а, во втором - гипотенуза b, в третьем - высота, опущенная из вершины прямого угла на гипотенузу h, в четвертом - площадь S. Составить программу, которая по заданному номеру варианта и значению соответствующего элемента вычисляла бы значение всех остальных элементов треугольника.

    9. Элементы равностороннего треугольника задаются в зависимости от указанного номера варианта. В первом варианте вводится сторона a, во втором - площадь S, в третьем - высота h, в четвертом - радиус вписанной окружности r, в пятом - радиус описанной окружности R. Составить программу, которая по заданному номеру варианта и значению соответствующего элемента вычисляла бы значение всех остальных элементов треугольника.

    10. Пусть элементами круга являются радиус - первый вариант, диаметр - второй вариант и длина окружности - третий вариант. Составить программу, которая для каждого варианта запрашивала бы соответствующее значение и вычисляла бы площадь круга.

    11. Написать программу, позволяющую по последней цифре числа определить последнюю цифру квадрата (куба) этого числа.

    12. Дано натуральное число n. Если оно делится на 4, вывести на экран ответ n = 4k (где k – соответствующее частное); если остаток деления на 4 равен 1, n = 4k + 1; если остаток от деления на 4 равен 2, n = 4k + 2; если остаток от деления на 4 равен 3, n = 4k+ 3. Например, 12 = 4*3, 22 = 4*5 + 2.

    13. Даны два действительных числа x и y. Арифметические действия над числами пронумерованы (1 – сложение, 2 – вычитание, 3 – умножение,
      4 – деление). Составить программу, которая бы вводила номер действия и по введенному значению выполняла бы то или иное действие над числами.

    14. Для каждой введенной цифры (0-9) вывести соответствующее ей название на английском языке (0-zero, 1-one, 2-two,…).

    15. Написать программу, которая по номеру дня недели (натуральному числу от 1 до 7) выдает в качестве результата количество занятий в этот день.

    16. Составить программу позволяющую получить словесное описание отметок (1-плохо, 2-неудовлетворительно, 3-удовлетворительно, 4-хорошо,
      5-отлично).

    17. Для целого числа от 1 до 99 напечатать фразу “Мне k лет”, учитывая при этом, что при некоторых значениях k слово “лет” надо заменить словом “год” или “года”. Например, 17 лет, 22 года, 21 год.

    18. Написать программу, которая по вводимому числу от 1 до 5 (номеру курса) выдает соответствующее сообщение “Привет, k - курсник”. Например, если k = 1, “Привет, первокурсник”; при k = 4: “Привет, четверокурсник”.

    19. Имеется пронумерованный список деталей: 1) шуруп, 2) гайка, 3) винт,
      4) гвоздь, 5) болт. Составить программу, которая по номеру детали выводит на экран ее название.

    20. Написать программу, которая бы по введенному номеру единицы измерения (1 – миллиметр, 2 – сантиметр, 3 – дециметр, 4 – метр,
      5 - километр) и длине отрезка L выдавала бы соответствующее значение длины отрезка в метрах.

    21. Написать программу, которая по введенному номеру единицы измерения
      (1 – миллиграмм, 2 – грамм, 3 – килограмм, 4 – центнер, 5 - тонна) и массе M выдавала бы соответствующее значение массы в килограммах.

    22. Определить остаток от деления целой части значения выражения |x2+a*b| на 7 и в зависимости от величины выдать сообщение об одном из дней недели.

    23. Составить программу, которая по данному числу (1-12) выводит название соответствующего ему месяца и следующего за ним.

    24. Написать программу, которая по данному натуральному числу от 1 до 12 (номеру месяца) выдается все приходящиеся на этот месяц праздничные дни (например, если введено число 1, то: 1 января – Новый год, 7 января - Рождество).

    25. Написать программу, которая бы по введенному номеру времени года
      (1-зима, 2-весна, 3-лето, 4-осень) выдавала соответствующие этому времени года месяцы, количество дней в каждом из месяцев.

    26. Составить программу, которая по заданным номерам года и месяца определяет количество дней в этом месяце.

  1. ^ Операторы цикла. Вложенные операторы цикла


Примеры вычисления k=n! с использованием различных операторов цикла:


а) {оператор цикла с предусловием}

k:=1; i:=2;

while i<=n do

begin

k:=k*i;

i:=i+1

end;


б) {оператор цикла с постусловием}

k:=1; i:=2;

repeat

k:=k*i;

i:=i+1

until i>n;


в) {оператор цикла с параметром}

k:=1;

for i:=2 to n do

k:=k*i;


Пример обработки последовательности n чисел без хранения всей последовательности: дано натуральное число n и последовательность чисел x1, x2,...,xn. Вычислить среднее арифметическое членов последовательности.


Program SREDNEE;

Var i,n :integer;

x,s :real;

begin

write(‘Введите количество членов последовательности ’);

readln(n);

s:=0;

writeln(‘Введите последовательность чисел’);

for i:=1 to n do

begin

write(‘Введите очередной член последовательности: ’);

readln(x);

s:=s+x

end;

s:=s/n;

writeln(‘s=’,s:10:3)

end.


    1. Дано натуральное N. Найти сумму 1+1/2+1/3+...+1/N.

    2. Дано натуральное N. Найти сумму N2+(N+1)2+…+(2N)2.

    3. Дано натуральное N. Найти произведение 1.1*1.2*1.3*… (N сомножителей).

    4. Дано натуральное N. Найти значение выражения 1.1-1.2+1.3-…
      (N слагаемых, знаки чередуются).

    5. Дано натуральное n и последовательность целых чисел x1, x2,...,xn.

  1. получить произведение (сумму) тех членов последовательности, которые нечетны (четны) и отрицательны (положительны);

  2. найти сумму и количество тех членов, которые делятся на a и не делятся на b;

  3. вычислить среднее арифметическое всех (всех положительных, всех отрицательных) членов последовательности;

  4. найти сумму тех членов последовательности, которые не принадлежат (принадлежат) интервалу (a,b);

  5. найти среднее арифметическое чисел, не принадлежащих (принадлежащих) отрезку [a,b] и кратных (не кратных) c;

  6. выдать члены последовательности кратные (не кратные) a и меньшие (большие, равные) b;

  7. выдать члены последовательности, которые принадлежат (не принадлежат) интервалу (a,b) и являются четными (нечетными);

  8. выдать положительные члены последовательности (отрицательные) и кратные (не кратные) числу a;

  9. найти сумму (произведение, количество, среднее арифметическое) первых положительных (неотрицательных, отрицательных, неположительных, ненулевых) членов последовательности;

  10. найти сумму (произведение, количество, среднее арифметическое) первых положительных (неотрицательных, отрицательных, неположительных, ненулевых) членов последовательности, кратных (не кратных) b.

    1. Дано натуральное n и последовательность целых чисел x1, x2,...,xn.

  1. выяснить, какое число встречается в последовательности раньше - положительное или отрицательное (четное или нечетное);

  2. определить номер первого четного (нечетного, кратного a, не кратного a, нулевого, ненулевого) члена последовательности;

  3. определить номер последнего нечетного (четного, кратного a, не кратного a, нулевого, ненулевого) члена последовательности;

  4. определить количество чисел в наиболее длинной последовательности из подряд идущих нулей;

  5. найти наибольшее (наименьшее) из четных и количество четных чисел;

  6. выяснить, имеются ли в последовательности два (три, n) подряд идущих нулевых члена;

  7. найти произведение членов последовательности, расположенными между первым и вторым нулевыми членами;

  8. найти среднее арифметическое членов последовательности, расположенными между предпоследним и последним нулевыми (ненулевыми) членами.

    1. Дано натуральное n и последовательность вещественных чисел x1, x2,...,xn.:

  1. определить число соседств двух положительных чисел;

  2. проверить, упорядочена ли последовательность по неубыванию (по невозрастанию, по неубыванию или по невозрастанию);

  3. найти k, при котором выполняется неравенство xk-1<a<xk (a задано);

  4. вычислить количество тех членов последовательности, для которых выполнимо i-1<xi<n;

  5. найти длину наименьшего отрезка числовой оси, содержащего числа x1, x2,...,xn.

    1. Вывести значения функции z=5x2+sin(x2)-5cos(x-2)2 для x, изменяющегося от a до b с шагом h.

    2. Вывести отрицательные (положительные) значения функции z=cos(x)-5sin(x-2) (z=sin(x)-5cos(x-2)) для x, изменяющегося от a до b с шагом h.

    3. Вывести значения функции z=ln(|x+1|)+tg(x), меньшие r, для x изменяющегося от a до b с шагом h.

    4. Вывести значения функции z=sin(x)+cos(x),находящиеся в интервале (a, b) для x, изменяющегося от c до d с шагом h.

    5. Найти сумму значений функции y=cos(x/a)+x/(a-2) для x, изменяющегося от a до b с шагом h.

    6. Найти сумму отрицательных значений функции z=sin(5-x)/cos(x-2) для x, изменяющегося от a до b с шагом h.

    7. Найти сумму значений функции z=sin(1/x)+5cos(1/(x-3))+x, больших r для x, изменяющегося от a до b с шагом h.

    8. Вывести значения функции y=ln(x+1/x), для последовательности значений x1, x2,…xn . При вводе числа, не входящего в область определения функции, или при использовании всех элементов последовательности вычисления прекратить.

    9. Найти сумму значений функции , для последовательности значений x1, x2,…xn . При вводе числа, не входящего в область определения функции, или при использовании всех элементов последовательности вычисления прекратить.

    10. Найти первый отрицательный член последовательности, вычисляемый по формуле sin(tg(n)) для n, изменяющегося следующим образом: n=1,2,3...

    11. Найти первый отрицательный член последовательности, образованный по закону: (b – заданное положительное число).

    12. Дано натуральное N. Найти двойной факториал N:
      N!!=N*(N-2)*(N-4)*...(последний сомножитель равен 2, если N – четное, и 1, если N - нечетное).

    13. Для заданных натуральных чисел a и b:

  1. получить наибольшее число вида a*k, меньшее b;

  2. получить наименьшее число вида ak, большее b;

  3. получить наибольшее число вида ak , меньшее b;

  4. определить, является ли число b степенью числа a или нет.

    1. Для заданного натурального числа n:

  1. вывести все (четные, нечетные) цифры числа n в обратной последовательности;

  2. подсчитать k - количество всех (кратных a) цифр в десятичной записи числа n;

  3. найти сумму цифр (произведение) числа n;

  4. найти старшую цифру в целом положительном числе;

  5. вывести все цифры числа n в прямой последовательности;

  6. выяснить, является ли заданное число палиндромом, т.е. таким, десятичная запись которого читается одинаково слева направо и справа налево;

  7. поменять крайнюю левую и крайнюю правую цифры в числе;

  8. определить число, получаемое выписыванием в обратном порядке цифр числа n.

    1. Составить программу, которая читает натуральное число n в десятичном представлении (n 1000), а на выходе выдает это же число в десятичном представлении и на естественном языке. Например, 7 семь; 204 двести четыре; 52 пятьдесят два.

    2. Числа Фибоначчи определяются формулами:

f0=f1=1; fn=fn-1+fn-2 при n=2, 3, ...

  1. определить n-ое число Фибоначчи;

  2. найти первое число Фибоначчи, большее m (m>1);

  3. вывести все числа Фибоначчи, меньшие m (m>1);

  4. вычислить сумму всех чисел Фибоначчи, которые не превосходят A;

  5. вычислить сумму всех чисел Фибоначчи, которые превосходят A, но не превосходят B;

  6. для последовательности из n чисел проверить, является ли она последовательностью Фибоначчи;

  7. проверить, является ли целое число A (A >1) числом Фибоначчи. Если является, то вывести его порядковый номер, если нет – вывести 0.

    1. Даны два положительных целых числа A и B (1<A<B). Вывести все простые числа, расположенные между A и B, в порядке их возрастания, а также количество этих чисел.

    2. Дано натуральное n и последовательность вещественных чисел x1, x2,...,xn ; получить

    3. Вычислить:

  1. y=(x-2)(x-4)...(x-2n);

  2. y=a(a+1)(a+2)...(a+n);

  3. y=cos(x)+cos(x2)+...+cos(xn);

  4. y=cos(x)+cos2 (x) +...+cos n (x);

  5. ;

  6. y=1!+2!+3!+...+n!;

  7. (n корней);

  8. ;

  9. ;

  10. ;

  11. ;

  12. ;

  13. .



    1. Вычислить Y для натурального n:

a)

b)

c)

d)

e)

f)

g)

i)




    1. Вычислить Y для натурального n и вещественного x;

a)

b)

c)

d)

e)

f)

g)

h)




    1. Вычислить:

a)

b)

c)

d)

e)

f)

g)

i)

j)

k)

l)

m)

n)

o)




    1. Даны n чисел, где n – натуральное число. Найти минимальный и максимальный элементы из этих чисел.

    2. Даны n различных чисел, где n – натуральное число. Найти номера минимального и максимального элементов из этих чисел.

    3. Даны n чисел, где n – натуральное число. Найти номер:

  1. первого минимального элемента из этих чисел;

  2. последнего минимального элемента из этих чисел;

  3. первого максимального элемента из этих чисел;

  4. последнего максимального элемента из этих чисел;

  5. первого экстремального (минимального или максимального) элемента из этих чисел;

  6. последнего экстремального (минимального или максимального) элемента из этих чисел.

    1. Даны n ненулевых целых чисел, где n – натуральное число. Найти максимальный (минимальный) нечетный (четный, положительный, отрицательный) элемент из данного набора. Если нечетные (четные, положительные, отрицательные) элементы в наборе отсутствуют, то вывести 0.

    2. Даны n чисел, где n – натуральное число. Найти количество элементов, расположенных после последнего минимального (максимального) элемента из этих чисел.

    3. Даны n чисел, где n – натуральное число. Найти количество элементов, расположенных между первым и последним минимальным (максимальным) элементом из этих чисел. Если среди чисел имеется единственный минимальный (максимальный) элемент, то вывести -1.

    4. Даны n чисел, где n – натуральное число. Найти количество минимальных (максимальных) элементов среди этих чисел.

    5. Дана последовательность из n ненулевых целых чисел, где n – натуральное число. Найти длину минимальной (максимальной) подпоследовательности четных (нечетных, положительных, отрицательных) чисел. Если нечетные (четные, положительные, отрицательные) элементы в наборе отсутствуют, то вывести 0.




  1. ^ Вычисления с заданной точностью

Программа для вычисления с заданной точностью eps значения функции y=e-x, используя ее разложение в ряд



Program SUM;

Var x, y, eps, r :real;

k :integer;

begin

write(‘Введите значение аргумента x=’);

readln(x);

write(‘Введите точность вычислений eps=’);

readln(eps);

r:=1; y:=1; k:=1;

while abs(r)>=eps do

begin

r:=-r*x/k;

y:=y+r;

k:=k+1

end;

writeln(‘y=’,y:10:3)

end.


^ Программа вычисления постоянной Эйзера-Маскерони как предела последовательности




Program COUST_EM;

Var n :integer; eps, s :real;

c, cp :real; {текущее и предыдущее значения постоянной}

begin

write(‘Введите точность вычислений eps=’);

readln(eps);

n:=1; s:=1; c:=1;

repeat

cp:=c;

n:=n+1;

s:=s+1/n;

c:=s-ln(n)

until abs(c-cp)
writeln(‘константа c=’,c:10:7)

end.


    1. Вычислить с заданной точностью:

  1. ; =ln 2

  2. ; =

  3. ; =

  4. ; =

  5. ; =

  6. ; =

  7. ; =

  8. ; =

  9. ; =

  10. ;

  11. ;

  12. ; =

  13. . =

    1. Вычислить с заданной точностью значение функции y=f(x), используя ее разложение в ряд:

  1. ;

  2. ;

  3. ;

  4. ;

  5. ;

  6. ;

  7. ;

  8. ;

  9. ;

  10. ;

  11. ;

  12. ;

  13. ;

  14. ;

  15. ;

  16. .

    1. Найти первый член последовательности, для которого выполнено следующее условие: |an-an-1|<eps, если последовательность образована по закону:







    1. Для заданных y0, и eps вычислить , используя формулу .

    2. Для заданных y0, и eps вычислить , используя формулу .

    3. Описать алгоритм определения предела последовательности {an} при n→∞, принимая за него такое значение an, при котором |an - an-1|< eps, eps>0. Определить номер члена последовательности, для которого это условие выполняется. Также вычислить точное значение предела. Здесь a>0, b>1, α>0, p - натуральное число.

  1. , предел равен e;

  2. , предел равен e;

  3. , предел равен 0;

  4. , предел равен 0;

  5. , предел равен 0;

  6. , предел равен 1;

  7. , предел равен 1;

  8. , предел равен ln(a);

  9. , предел равен 1;

  10. , предел равен 1;

  11. , предел равен ;

  12. , предел равен ;

  13. , предел равен ln2;

  14. , предел равен .

  1. Символьный тип. Обработка последовательностей символов

Программа вывода последовательностей букв:

a

ab

abc

. . .

abc...xyz

Program ABC;

var c, d: char ;

begin

for c:=’a’ to ‘z’ do

begin

for d:=’a’ to c do write(d);

writeln

end

end.

    1. Для данного натурального n и последовательности символов s1, s2,..., sn:

  1. подсчитать общее число вхождений символов +, -, *, /;

  2. выяснить, встречаются ли в данной последовательности группы из трех стоящих рядом точек;

  3. получить первое i, для которого si и si+1 совпадают с заданной буквой;

  4. найти i такое, что si первая по порядку запятая;

  5. выяснить, имеется ли среди заданных s1, s2,..., sn пара соседствующих букв ab или ba;

  6. выдать все пары совпадающих символов;

  7. подсчитать наибольшее число заданных букв, идущих подряд;

  8. определить общее число латинских букв, входящих в последовательность.

    1. Даны: натуральное n и последовательность символов s1, s2,..., sn: Известно, что среди s1, s2,..., sn есть по крайней мере одна запятая. Найти натуральное i такое, что:

  1. si – первая по порядку запятая;

  2. si – последняя по порядку запятая.

    1. Вывести последовательности символов:

  1. ^ ABBCCC ... ZZ...Z;

  2. ZYYXXX ... AA...A;

  3. ABC...ZBC...Z ... YZZ.

    1. Дана последовательность символов, за которой следует точка (в сам текст точка не входит):

  1. переменной f присвоить значение true, если буква a встречается чаще, чем буква b, и присвоить значение false в противном случае;

  2. подсчитать, сколько раз встречается последовательность из n букв (0<n<4);

  3. проверить, правильно ли в данной последовательности расставлены круглые скобки;

  4. определить, является ли данная последовательность символов правильной записью целого числа (возможно, со знаком).

    1. Последовательность символов содержит слова из латинских букв, соседние слова отделены друг от друга запятой, за последним символом – точка. Определить:

  1. общее число букв в словах;

  2. количество слов, которые начинаются с заданной буквы;

  3. количество слов, которые оканчиваются заданной буквой;

  4. количество слов, которые начинаются и оканчиваются одной и той же буквой;

  5. количество слов, в которых встречается (отсутствует) заданная буква;

  6. количество слов, в которых встречается заданная буква не менее заданного числа раз;

  7. количество слов, в которых встречается заданная буква заданное число раз;

  8. количество букв в каждом слове;

  9. количество слов, в которых гласных (согласных) букв больше чем согласных (гласных);

  10. найти длину самого короткого (длинного) слова.

  1. Литература

    1. Абрамов С.А., Зима Е.В. Начала программирования на языке Паскаль. М.: Наука, 1989.

    2. Амелина Н.И., Демяненко Я.М., Лебединская Е.Н., Пасечный Л.Г., Спивак И.Г., Усов А.Б. , Угольницкий Г.А. Задачи по программированию. М., Вузовская книга, 2000.

    3. Ахо А., Хопкрофт Дж., Ульман Дж. Построение и анализ вычислительных алгоритмов. М.: Мир, 1979.

    4. Гутер Р.С., Минаева С.С., Резниковский П.Т. Задачник – практикум по программированию и вычислительной математике. М.: Наука, 1973

    5. Двайт Г.Б. Таблицы интервалов и другие математические формулы. М.: Наука, 1978

    6. Епанешников А.М., Епанешников В.А. Программирование в среде Turbo Pascal 7.0. М.: Диалог-МИФИ, 1996

    7. Йенсен К., Вирт Н. Паскаль. Руководство пользователя и описание языка. М. Финансы и статистика, 1982

    8. Пильщиков В.Н. Сборник упражнений по языку Паскаль. М.: Наука, 1989.

    9. Прайс Д. Программирование на языке Паскаль: Практическое руководство. Пер с англ. М.: Мир, 1987.

    10. Семашко Г.Л., Салтыков А.И. Программирование на языке Паскаль. М.: Наука. Гл. ред. физ.-мат. лит., 1988. - 128 с.






Скачать 276,98 Kb.
оставить комментарий
Н.И. Амелина
Дата26.09.2011
Размер276,98 Kb.
ТипМетодические указания, Образовательные материалы
Добавить документ в свой блог или на сайт

плохо
  3
не очень плохо
  2
Ваша оценка:
Разместите кнопку на своём сайте или блоге:
rudocs.exdat.com

Загрузка...
База данных защищена авторским правом ©exdat 2000-2017
При копировании материала укажите ссылку
обратиться к администрации
Анализ
Справочники
Сценарии
Рефераты
Курсовые работы
Авторефераты
Программы
Методички
Документы
Понятия

опубликовать
Документы

наверх