Помощь - Поиск - Пользователи - Календарь
Полная версия: народ! помогите решить задачи..
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Slava
1.Составить программу, которая бы для введенного натурального числа N (N <= 1000000000) выводила его разложение на простые множители.
2.Составить программу, которая бы для введенного натурального числа N (1 < N <=1000000000) выводила список его простых множителей с учетом их кратности. Простые множители с учетом их кратности должны выводиться в виде пар n m (где n – количество множителей, m – значение множителя) в порядке возрастания значений множетелей.
3.Наибольшим общим делителем (НОД) двух целых чисел m и n называется их общий делитель d, который делится на любой другой общий делитель m и n. Наибольший общий делитель определён если хотя бы одно из чисел m или n не ноль. Составить программу, которая бы для целых чисел N и M (|N|, |M| <=2000 000 000) находила их НОД (наибольший общий делитель).
5.Вывести в 5 колонок список пятизначных нечетных симметричных чисел, (например 34543 или 70507). Ширина колонки должна быть равна 7 символов. Пробелы – перед числом.
6.На отрезке [A;B] найти количество нечетных чисел, делящихся без остатка на каждую из своих цифр. Предусмотреть защиту от возможного деления на ноль.
7.На отрезке [A;B] вывести список всех четырехзначных нечетных чисел, делящихся без остатка на сумму своих цифр.
8.Числа Фибоначчи определяются как: F1 =1, F2 =1, F3 = F2+ F1, ... Fn = Fn-1 + Fn-2 при n>2. Получить N-ое N (N <= 30) чисело Фибоначчи.
9.Числа Фибоначчи определяются как: F1 =1, F2 =1, F3 = F2+ F1, ... Fn = Fn-1 + Fn-2 при n>2. Найти минимальное число Фибоначчи, превышающее N (N<100000)
10.Числа Фибоначчи определяются как: F1=1, F2=1, F3 = F2+ F1, ... Fn = Fn-1 + Fn-2 при n>2. Вывести все числа Фибоначчи, кратные N и меньшие M (M < 1 000 000). В случае, если таковых не найдется вывести NO.
11.Составить программу, которая бы для введенного натурального числа N (N <= 1000 000) выводила количество его делителей.
13.Число называется простым, если у него два делителя. Необходимо составить программу, которая бы для введенного натурального числа N (N <= 1000 000 000) определяла простое это число или нет.
14.На отрезке [A;B] подсчитать количество простых чисел (1<=A <= B <= 10000).
16.На отрезке [A;B] подсчитать количество чисел у которых количество делителей есть число простое (1<=A <= B <= 1000).
17.Подсчитать количество счастливых билетов. Номер билета - произвольная комбинация 6 цифр. Билет называется счастливым, если сумма первых трех цифр номера билета совпадает с суммой трех последующих.

если можно то побыстрее..... ПОЖАЛУЙСТО!!!!!!!
jaw
И если не трудно помогите и мне, очень срочно...до завтра надо...плиз,плиз....у нас в универе модульные контрольные и нам разрешили взять задачу на дом...помогите написать на паскале....y=система, в ней -3x+9,если 2<=x<=7
18/x-7, если x>7
x в квадрате+3, если x<2
ve7er
И если не трудно помогите и мне, очень срочно...до завтра надо...плиз,плиз....у нас в универе модульные контрольные и нам разрешили взять задачу на дом...помогите написать на паскале....y=система, в ней -3x+9,если 2<=x<=7
18/x-7, если x>7
x в квадрате+3, если x<2

 program Project2;



uses crt;

var
y,x:real;
begin
writeln('x='); readln(x);
if (2<=x) and(x<=7) then y:=-3*x+9;
if x>7 then y:=18/x-7;
if x<2 then y:=x*sqr(x)+3;
write('otvet:',y:1:1);

end.
мисс_граффити
blink.gif
ничего себе нарушений в одной теме!
 ! 
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
6. Одна тема - один вопрос (задача)


А jaw и вовсе зачем-то разместила свои задачи в чужой теме....

Закрыто.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.