Контрольная работа
«Решения задач на Pascal Теория чисел. Составить программу разложения на простые множители введенного с клавиатуры натурального числа»
- 15 страниц
1.4. Лабораторная работа 1
Тема: Теория чисел
Вариант Задания
2 1. Составить программу разложения на простые множители введенного с клавиатуры натурального числа
2. В трехзначном числе зачеркнули первую цифру слева, когда полученное двузначное число умножили на 7, то получили исходное число. Найдите это число.
1.
4
1. Разработать программу печати всех простых чисел в диапазоне от N до M (значения переменных N и M задаются с клавиатуры), а также подсчитать их количество.
2. Среди четырехзначных чисел выбрать те, у которых все четыре цифры различны.
6 1. Дано простое число Р. Найти и вывести на экран следующее за ним простое число.
2. Найти самую большую цифру целого числа.
1.
8 1. Разработать программу поиска трех простых чисел,
предшествующих числу М, заданному пользователем,
причем М>=10.
2.Составить программу, проверяющую, является ли
заданное натуральное число совершенным.
9 1. Разработать программу поиска и печати всех чисел-близнецов, принадлежащих заданному диапазону [N,M ].
2. Проверить, являются ли два данных числа взаимно простыми.
Лабораторная работа 2
Тема: Подпрограммы
помощью процедуры функции
Вариант Задания
1.
2 1. Даны две дроби A/В и С/D (A,B,C,D-натуральные числа). Составить программу для сложения дробей. Результат должен быть несократимой дробью.
2. Сформировать массив X(N), N-й член которого определяется формулой X(N)=1/N!.
3 1. Заменить отрицательные элементы линейного массива их модулями, не пользуясь стандартной функцией вычисления модуля. Подсчитать количество произведенных замен.
4 1. Составить программу для вычисления суммы факториалов всех чётных чисел от m до n.
2. Заменить данное натуральное число на число, которое получается из исходного записью его цифр в обратном порядке ( например, дано число 156, нужно получить 651).
1.
6 1. Составить функцию для нахождения наименьшего нечётного натурального делителя k (k≠1) любого заданного натурального числа n.
2. Напечатать все пары чисел-близнецов из отрезка [n,2n], где n – заданное натуральное число больше 2.
1.
8 1. Составить программу, определяющую, в каком из данных двух чисел больше цифр.
2. Написать программу вычисления суммы 1+1/2+1/3+…+1/n для зааданного числа n. Результат представить в виде несократимой дроби p/q ( p, q – натуральные).
9 1. Составить программу для нахождения чисел из интервала [M,N], имеющих наибольшее количество делителей.
2. Найти все числа Армстронга от 1 до К написать программу, которая находит и выводит на печать все четырехзначные числа вида abcd, для которых выполняется: 1) a, b, c, d – разные цифры; 2) ab - cd = a+ b+ c+ d.
program lab1b;
uses crt;
var n,i,j:integer;
b:array[1.5] of integer;
a:array[1.4] of integer;
begin
clrscr;
randomize;
for i:=1 to 5 do begin
b[i]:=random(9999);
if b[i]>=1000 then
write(b[i]:5);
end;
writeln;
for i:=1 to 5 do begin
if b[i]>=1000 then
n:=b[i];
for j:=1 to 4 do begin
a[j]:=n mod 10;
n:=n div 10;
end;
if (a[1]<>a[2])and(a[1]<>a[3])and(a[1]<>a[4]) then
if (a[2]<>a[3])and(a[2]<>a[4]) then
if (a[3]<>a[4]) then
write(b[i]:5);
end;
readln;
end.
Program algEvkl;
Var x, y: integer;
Begin
Readln(x,y);
Repeat
If (x>y) then x:= x mod y else y:= y mod x;
Until (x=0) or (y=0);
if x+y=1 then Writeln(\'YES\') else writeln(\'no\');
Readln;end.
1. Зуев Е.А. Язык программирования Турбо- Паскаль 6.0. – М., Унитех, 1992.
2. Немнюгин С.А. Турбо- Паскаль. – СПб.: Питер, 2000.
3. Федоренко Ю. Алгоритмы и программы на Turbo Pascal. Учебный курс.- СПб: Питер, 2001.
4. Семакин И. Г., Шестаков А. П. Основы программирования. – М.; Мастерство, 2002.
5. Могилев А.В. и др. Информатика: учебное пособие для ВУЗов. – М.; Изд. Центр «Академия», 2002.
Готовые решения задач на языке Паскаль
К работе прилагается все исходники с расширением .pas.
Тема: | «Решения задач на Pascal Теория чисел. Составить программу разложения на простые множители введенного с клавиатуры натурального числа» | |
Раздел: | Программирование, Базы данных | |
Тип: | Контрольная работа | |
Страниц: | 15 | |
Цена: | 400 руб. |
Закажите авторскую работу по вашему заданию.
- Цены ниже рыночных
- Удобный личный кабинет
- Необходимый уровень антиплагиата
- Прямое общение с исполнителем вашей работы
- Бесплатные доработки и консультации
- Минимальные сроки выполнения
Мы уже помогли 24535 студентам
Средний балл наших работ
- 4.89 из 5
написания вашей работы
У нас можно заказать
(Цены могут варьироваться от сложности и объема задания)
682 автора
помогают студентам
42 задания
за последние сутки
10 минут
время отклика
Решения задач на Pascal Множества, Сортировки, Подпрограммы, Записи, Файлы В2,4,6,8,9,11,12
Контрольная работа:
Решения задач на Pascal Множества, Сортировки, Подпрограммы, Записи, Файлы В6. Дано простое число Р. Найти и вывести на экран следующее за ним простое число.
Контрольная работа:
Решения задач на Pascal Множества, Сортировки, Подпрограммы, Записи, Файлы В2. Составить программу разложения на простые множители введенного с клавиатуры натурального числа
Контрольная работа:
Решения задач на Pascal Множества, Сортировки, Подпрограммы, Записи, Файлы В8. Разработать программу поиска трех простых чисел, предшествующих числу М, заданному пользователем
Дипломная работа:
Применение теории чисел к решению математических задач