Определить значение переменной s после выполнения следующих операторов- s - 0; i - 0; While i[5 Do Inci; s

Работа добавлена на сайт samzan.net:

Циклы с предусловием

1.  Дана последовательность операторов:

a := 1; b := 1;
while a + b < 8 do Begin a :=a + 1; b := b + 2 End;
s := a + b

Сколько раз будет повторен цикл и какими будут значения переменных a, b и s после завершения этой последовательности операторов?

1.  Какими будут значения переменных a и b после выполнения операторов:

a := 1; b := 1;
While a <= 3 Do a := a + 1; b := b + 1.

1.  Определить значение переменной s после выполнения следующих операторов:
   1.  s := 0; i := 0; While i<5 Do Inc(i); s := s + 100 Div i; 
   2.  s := 0; i := 1; While i>1 Do Begin s := s + 100 Div i; dec(i) End; 
2.  Дана последовательность операторов, вычисляющих факториал f числа n:

k := 1; f := 0:
While k<n Do f := f * k
k := k + 1;

которая содержит пять ошибок. Найдите эти ошибки.

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

p := n;
While p>=0 Do
Begin
a := a + p Mod 10;
p := p Div 10
End;

1.  Найти сумму цифр числа.
2.  Найти первую цифру числа.
3.  Приписать по 1 в начало и в конец записи числа n. Например, было n=3456, стало n=134561.
4.  Поменять местами первую и последнюю цифры числа.
5.  Поменять порядок цифр числа на обратный. Например, было 12345, стало 54321.
6.  Найти количество чётных цифр целого положительного числа.
7.  Найти самую большую цифру целого числа.
8.  Найти сумму цифр целого числа, больших 5.
9.  Сколько раз данная цифра встречается в целом числе?
10.  Составить программу, проверяющую, является ли последовательность из 10 целых чисел, вводимых с клавиатуры, возрастающей.
11.  Составить программу, проверяющую, является ли заданное натуральное число палиндромом, то есть таким, десятичная запись которого читается одинаково слева направо и справа налево.

Циклы с постусловием

1.  Определить значение переменной s после выполнения следующих операторов:

s := 0; i := 1;
Repeat s := s + 5 Div i; i := 1 - 1; Until i<=1;

1.  Произведение максимального количества N первых нечетных чисел не больше p. Каков последний сомножитель? Сколько сомножителей взято?
2.  Числа Фибоначчи (fn) определяется формулами: f0 = f1 = 1; fn = fn = fn-1 + fn-2 при n=2, 3,... Составить программу:
   1.  определения f - 40-е число Фибоначчи;
   2.  поиска f - первого числа Фибоначчи, большего m (m>1); 
   3.  вычисления s - суммы всех чисел Фибоначчи, которые не превосходят 1000.
3.  Составить программу, проверяющую, является ли заданное натуральное число совершенным, то есть равным сумме своих положительных делителей, кроме самого этого числа.
4.  Показать, что любой оператор цикла с предусловием можно записать с помощью условного оператора и оператора цикла с постусловием.
5.  Показать, что любой оператор цикла с постусловием можно записать с помощью условного оператора и оператора цикла с предусловием.
6.  Дана непустая последовательность натуральных чисел, за которой следует 0. Вычислить сумму положительных элементов последовательности, порядковые номера которых нечетны.

Вложенные циклы

1.  Что будет выведено на экране монитора после выполнения следующего фрагмента программы:

a := 1; b := 1;
For i := 0 To n Do
Begin
For j := 1 To b Do Write('*');
Writeln;
c := a + b; a := b; b := c;
End;

если n = 6? Решение какой задачи выражает этот фрагмент программы?

1.  Что будет выведено на экране монитора после выполнения следующего фрагмента программы:

b := 0;
While a<>0 Do
Begin
b := b*10 + a Mod 10;
a := a Div 10;
End;
Write(b);

если a = 13305? Решение какой задачи выражает этот фрагмент программы?

1.  Исходное данное - натуральное число q, выражающее площадь. Написать программу для нахождения всех таких прямоугольников, площадь которых равна q и стороны выражены натуральными числами.
2.  Составить программу для графического изображения делимости чисел от 1 до n (n - исходное данное). В каждой строке надо печатать число и сколько плюсов, сколько делителей у этого числа. Например, если исходное данное - число 4, то на экране должно быть напечатано:

1+

2++

3++

4+++

1.  Составить программу получения всех совершенных чисел, меньших заданного числа n. Число называется совершенным, если равно сумме всех своих положительных делителей, кроме самого этого числа. Например, 28 - совершенно, так как 28=1+2+4+7+14.

Из истории. Грекам были известны первые четыре совершенных числа: 6, 28, 496, 8128. Эти числа высоко ценились. Даже в XII веке церковь утверждала, что для спасения души необходимо найти пятое совершенное число. Это число было найдено только в XV веке. До сих пор совершенные числа полностью не исследованы - не известно, имеется ли конечное число совершенных чисел или их число бесконечно, кроме того, неизвестно ни одного нечётного совершенного числа, но и не доказано, что таких чисел нет.

1.  Дано натуральное число n. Можно его представить в виде суммы трёх квадратов натуральных чисел? Если можно, то:
   1.  указать тройку x, y, z, таких натуральных чисел, что x2 + y2 + z2 = n;
   2.  указать все тройки x, y, z таких натуральных чисел, что x2 + y2 + z2 = n.
2.  Найти натуральное число от 1 до 10000 с максимальной суммой делителей.
3.  Даны натуральные числа a, b (a<b). Получить все простые числа p, удовлетворяющие неравенствам: a<=p<=b.
4.  Даны натуральные числа n, m. Получить все меньшие n натуральные числа, квадрат суммы цифр которых равен m.
5.  Даны натуральные числа n и m. Найти все пары дружественных чисел, лежащих в диапазоне от n до m. Два числа называются дружественными, если каждое из них равно сумме всех делителей другого (само число в качестве делителя не рассматривается).
6.  В данном натуральном числе переставить цифры таким образом, чтобы образовалось наименьшее число, записанное этими же цифрами.
7.  Составить программу, печатающую для данного натурального числа k-ю цифру последовательности:
   1.  12345678910..., в которой выписаны подряд все натуральные числа;
   2.  14916253649..., в которой выписаны подряд квадраты всех натуральных чисел;
   3.  1123581321..., в которой выписаны подряд все числа Фибоначчи.
8.  Составить программу возведения заданного числа в третью степень, используя следующую закономерность:

13 = 1

23 = 3 + 5

33 = 7 + 9 + 11

43 = 13 + 15 + 17 + 19

53 = 21 + 23 + 25 + 27 + 29

1.  Составить программу для нахождения всех натуральных решений уравнения n2 + m2 = k2 в интервале [1, 10].

Примечание. Решения, которые получаются перестановкой n и m, считать совпадающими.

Циклы со счетчиком

1.  Сколько раз будут выполнены операторы из тела циклов в следующих фрагментах программ:
   •  For k:=-1 To 1 Do ...
   •  For k:=10 To 20 Do ...
   •  For k:=20 To 10 Do ...
   •  k:=5; r:=15;
   •  For i:=k+1 To r-1 Do ...
   •  k:=5; r:=15;
   •  For i:=0 To k*r Do ...
   •  k:=r;
   •  For i:=k To r Do ...
2.  Определить значение переменной S после выполнения следующих операторов:

s := 0; n := 10

For i := 2 To n Do s := s + 100 Div i

1.  Составить программу возведения натурального числа в квадрат, используя следующую закономерность:

12 = 1

22 = 1 + 3

32 = 1 + 3 + 5

42 = 1 + 3 + 5 + 7

....

n2 = 1 + 3 + 5 + 7 + 9 + ... + 2n-1

1.  Определить количество трехзначных натуральных чисел, сумма цифр которых равна заданному числу N.
2.  Составить программу вычисления суммы кубов чисел от 25 до 125.
3.  Среди двузначных чисел найти те, сумма квадратов цифр которых делится на 13. Ответ: .
4.  Написать программу поиска двузначных чисел, таких, что если к сумме цифр этого числа прибавить квадрат этой суммы, то получится это число.
5.  Квадрат трехзначного числа оканчивается тремя цифрами, которые как раз и составляют это число.
6.  Написать программу поиска четырехзначного числа, которое при делении на 133 дает в остатке 125, а при делении на 134 дает в остатке 111. Ответ: 1987.
7.  Найти сумму положительных нечетных чисел, меньших 100.
8.  Найти сумму целых положительных чисел из промежутка от A до B, кратных 4 (значения переменных A и B вводятся с клавиатуры).
9.  Найти сумму целых положительных чисел, больших 20, меньших 100, кратных 3 и заканчивающихся на 2, 4 или 8.

1. то далеко и на душе легко Внутри всё опустело я взлетаю высокоНабрав высоту вздохну глубокоМне не одиноко.
2. Лаиса.html
3. 27.12. dios [ади`ос] Пока До свидания Buenos
4. мотивация приобрело несколько иное содержание
5. Тема- Атеросклероз Еталони відповідей ЕхоКГ 1 Дилатація порожнини лівого шлуночка ознаки його гіп
6. ТЕМА СКОВОРОДИ 12 2
7. реферат дисертації на здобуття наукового ступеня кандидата медичних наук - Київ2006 Дисер
8. Тема 6 ОРГАНИЗАЦИЯ ПРЕДПРИНИМАТЕЛЬСКОЙ ДЕЯТЕЛЬНОСТИ
9. методический комплекс для студентов заочной заочной на базе высшего профессионального образования и з
10. таможенная территори
11. Но современное общество характеризуется стремительным изменением темпов жизни технологиями лавинообразн
12. . Общие цели банковского менеджмента и маркетинга.
13. Любой урок отражает концепцию учителя и обладает общими свойствами
14. Чебоксары
15. Политический режим
16. Кулиджанов Лев Александрович
17. Реферат- Полномочия хозяйственного суда
18. лекция’3 февральская революция 1917 характер и смысл
19. Введение Международная торговля услугами не является новым явлением
20. Осуществляет рациональную организацию сбыта продукции предприятия ее поставку потребителям в сроки и объе

Материалы собраны группой SamZan и находятся в свободном доступе