Циклы while решение задач

Источник

Оператор цикла WHILE

Задача 1. Дано целое число а и натуральное (целое неотрицательное) число n. Вычислить а в степени n. {Введем целую переменную k, которая меняется от 0 до n, причем поддерживается такое свойство: b = (a в степени k).}

USES Crt;

VAR

A, N, B, K : INTEGER;

BEGIN

ClrScr;

Write(‘ Введите два значения ‘); ReadLn(A,N);

K := 0; B := 1;

While K <> N DO Begin

K := K + 1; B := B * A;

End;

Write(‘ A в степени N = ‘,B);

END.

Другое решение той же задачи:

USES Crt;

VAR

A, N, B, K : INTEGER;

BEGIN

ClrScr; { Чистка экрана }

Write(‘ Введите два значения ‘); ReadLn(A,N);

K := N; B := 1;

{A в степени N = B * (A в степени K)}

While K <> 0 DO Begin

K := K – 1; B := B * A;

End;

Write(‘ A в степени N = ‘,B);

END.

Задача 2. Даны натуральные числа а, b. Вычислить произведение а*b, используя в программе лишь операции +, -, =, <>.

USES Crt;

VAR

A, B, C, K : INTEGER;

BEGIN

Write(‘ Введите два значения ‘); ReadLn(A,B);

K := 0; C := 0;

While K <> B DO Begin

K := K + 1; C := C + A;

End;

{C = A * K и K = B, следовательно, C = A * B}

Write(‘ A*B= ‘,C);

END.

Задача 3. Дано натуральное (целое неотрицательное) число A и целое положительное число D. Вычислить частное Q и остаток R при делении A на D, не используя операций DIV и MOD. (Согласно определению, А = Q * D + R, 0 <= R < D.)

USES Crt;

VAR

A, D, R, Q : INTEGER;

BEGIN

ClrScr;

Write(‘ Введите два значения ‘); ReadLn(a,d);

R := A; Q := 0;

While Not (R < D) DO Begin

R := R – D; {R >= 0}

Q := Q + 1;

End;

WriteLn(‘ Частное = ‘,Q);

WriteLn(‘ Остаток = ‘,R);

END.

Задача 4. Каждый год урожайность повышается на 5%. Через сколько лет урожай удвоится?

USES Crt;

VAR

YR, KL: BYTE; YRG: REAL;

Begin

ClrScr;

Write(‘Введите урожайность ‘); ReadLn(YR);

YRG:=YR;

While (YRG <2*YR) Do Begin

YRG:=YRG+0.05*YRG;

KL:=KL+1;

End;

WriteLn(‘Новый урожай ‘,YRG:5:0);

Write(‘Через ‘,KL,’ лет урожай удвоится’);

END.

Задача 5. Деду M лет, а внуку N лет. Через сколько лет дед станет вдвое старше внука. И сколько при этом лет будет деду и внуку.

USES Crt;

VAR

M,N: BYTE; Kl: BYTE;

BEGIN

ClrScr;

Write(‘Введите количество лет деда ‘); ReadLn(m);

Write(‘Введите количество лет внука ‘); ReadLn(n);

KL:=0;

While (M>2*N) DO Begin

M:=M+1; N:=N+1; KL:=KL+1;

End;

WriteLn(M,’ лет деду’);

WriteLn(N,’ лет внуку’);

WriteLn(‘Через ‘,KL,’ лет дед вдвое станет старше внука’);

END.

Задача 6. Поле засеяли цветами двух сортов на площади S1 и S2. Каждый год площадь цветов первого сорта увеличивается вдвое, а площадь второго сорта увеличивается втрое. Через сколько лет площадь первых сортов будет составлять меньше 10% от площади вторых сортов.

USES Crt;

VAR

S1,S2:WORD; KL:BYTE;

BEGIN

ClrScr;

Write(‘Введите площадь, которую засеяли цветами 1-го сорта ‘); ReadLn(S1);

Write(‘Введите площадь, которую засеяли цветами 2-го сорта ‘); ReadLn(S2);

KL:=1;

While (S1>0.1*S2) DO Begin

S1:=S1*2; S2:=S2*3; KL:=KL+1;

End;

WriteLn(‘Площадь, которую засеяли цветами 1-го сорта ‘,S1);

WriteLn(‘Площадь, которую засеяли цветами 2-го сорта ‘,S2);

WriteLn(‘Через ‘, kl,’ лет’);

END.

Задача 7. Составить программу перевода числа из 10 системы счисления в 2 систему счисления.

Для этой задачи представлено два решения.

a)

USES Crt;

VAR

DES, OST, I, DW:INTEGER;

BEGIN

ClrScr;

Write(‘Введите десятичное число ‘); ReadLn(DES);

I:=1;

While (DES>=2) DO Begin

OST:=DES mod 2;

DES:=DES div 2;

DW:=DW+OST*I;

I:=I*10;

End;

DW:=DW+DES*I;

Write(‘Двоичная запись числа ‘,DW);

END.

b)

USES Crt;

Const A=10;

VAR

DES, OST, I:INTEGER;

DW:Array[1..100] OF INTEGER;

BEGIN

ClrScr;

Write(‘Введите десятичное число ‘); ReadLn(des);

I:=1;

While (des>=2) DO Begin

OST:=DES mod 2;

DES:=DES div 2;

DW[I]:=OST;

I:=I+1;

End;

DW[I]:=DES;

FOR I:=I DownTo 1 DO

Write(DW[I]);

END.

…………………………………………………………………………………………………………………….

Практические задания

…………………………………………………………………………………………………………………….

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

2. Дано натуральное n, вычислить n! (0!=1, n! = n * (n-1)!).

3. Последовательность Фибоначчи определяется так: a(0)= 1, a(1) = 1, a(k) = a(k-1) + a(k-2) при k >= 2. Дано n, вычислить a(n).

4. К старушке на обед ходят кошки. Каждую неделю две кошки приводят свою подружку. В доме у старушки 100 мисок. Через какое время появятся лишние кошки, и сколько кошек при этом останется голодными.

5. Известна сумма номеров страниц, определить номер страницы.

6. Лягушка каждый последующий прыжок делает в два раза короче предыдущего. Достигнет ли она болота и за сколько прыжков. Длину первого прыжка задайте самостоятельно.

Источник

Содержание

• 1. Назначение оператора цикла while. Общая форма. Особенности использования
• 2. Понятие вложенных циклов while
• 3. Схема оператора while
• 4. Примеры решения задач с оператором цикла while
  • 4.1. Вывод результатов вычисления в цикле
  • 4.2. Рекурентные алгоритмы. Вычисление n-го члена последовательности
  • 4.3. Вычислить значения числа π с заданной точностью
• 5. Примеры решения задач, в которых оператор while есть вложенным
  • 5.1. Цикл while есть вложенным в оператор выбора switch
  • 5.2. Цикл while есть вложенным в операторе цикла for
• Связанные темы

Поиск на других ресурсах:

1. Назначение оператора цикла while. Общая форма. Особенности использования

Оператор цикла while предназначен для организации циклического процесса, в котором выполнение каждой следующей итерации определяется на основе истинности некоторого условия. Оператор цикла while еще называют оператором цикла с предусловием.

Общая форма оператора цикла while следующая:

while (условие) оператор;

здесь

• условие – некоторое условие согласно синтаксису языка C#. Инструкция оператор выполняется до тех пор, пока значение условие = true. Как только значение условие становится равным false, то циклический процесс прекращается и выполняются следующие после while операторы;
• оператор – один или несколько операторов. Если в цикле while нужно выполнить несколько операторов одновременно, то эти операторы берутся в фигурные скобки { }.

Тело цикла (оператор) выполняется, пока значение условие есть истинным (true). Оператор цикла должен быть организован таким образом, чтобы в конечном счете значение условия стало равно false. Иначе, программа «зависнет», так как выйдет бесконечный цикл.

Общая форма оператора цикла while, в котором выполняются несколько (два и более) операторов имеет следующий вид

while (условие)
{
оператор1;
оператор2;
…
операторN;
}

⇑

2. Понятие вложенных циклов while

Цикл while может быть вложенным в другие конструкции. Этими конструкциями могут быть:

• циклы for, while, do…while;
• оператор условного перехода if;
• оператор выбора switch.

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

⇑

3. Схема оператора while

На рисунке 1 изображена схема оператора while. Как видно из схемы, сначала происходит проверка условия. Если значение условия равно True, то выполняется тело цикла. Выход из циклического процесса происходит в случае, если значение условия становится равно False.

Рисунок 1. Схема оператора while

⇑

4. Примеры решения задач с оператором цикла while

4.1. Вывод результатов вычисления в цикле

Условие задачи. Получить таблицу температур по Цельсию tc от -50 до +50 градусов а также их эквивалентов по шкале Фаренгейта tf, используя соотношение

Решение. Текст программы решения данной задачи для приложения типа Console Application, с использованием цикла while, следующий

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication3
{
class Program
{
ic void Main(string[] args)
{
// шкала температур Цельсий => Фаренгейт
int tc; // текущее значение температуры по Цельсию
double tf; // значение температуры по Фаренгейту
tc = -50;
Console.WriteLine(“Шкала температур: Цельсий – Фаренгейт”);
while (tc <= 50)
{
tf = 9.0 / 5.0 * tc + 32;
tc++;
Console.WriteLine(“{0} C => {1} F”, tc, tf);
}
}
}
}

⇑

4.2. Рекурентные алгоритмы. Вычисление n-го члена последовательности

Условие задачи. Определить n-й член числовой последовательности (n>2):

xn=xn-1 + xn-2; x0 = x1 = 1

Решение. Текст программы решения данной задачи следующий:

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication3
{
class Program
{
ic void Main(string[] args)
{
// вычисление n-го члена последовательности
int n; // n>2
int x0, x1, x2;
int i;
// ввести значение n
Console.Write(“n = “);
n = Convert.ToInt32(Console.ReadLine());
// начальные присваивания
x0 = x1 = 1;
x2 = x0 + x1;
i = 1;
while (i <= n – 3) // вычисление
{
x0 = x1;
x1 = x2;
x2 = x0 + x1;
i++;
}
Console.WriteLine(“{0} “, x2);
}
}
}

В результате выполнения вышеприведенного кода, будет получен следующий результат

n = 7
13

⇑

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

Условие задачи. Вычислить значения числа π, используя формулу:

Определить, какое количество слагаемых нужно для определения числа π с точностью 7 знаков после запятой.

Решение. Для решения подобных задач цикл while подходит как нельзя лучше. Программный код решения задачи для приложения типа Console Application приведен ниже

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication3
{
class Program
{
ic void Main(string[] args)
{
// вычислить значение числа Пи
double pi; // результат
int denom; // знаменатель
int ; // переменная, изменяющая знак числа + на -, и наоборот
double t; // дополнительная переменная – текущая точность
const double eps = 0.0000001; // точность 7 знаков после запятой
int k; // количество слагаемых для получения заданной точности
// начальные приготовления
k = 0;
pi = 0;
denom = 1;
= 1;
t = 1.0 / denom * ;
// цикл while – вычисление
while (t > eps)
{
pi = pi + 4 * t * ;
= -; // изменить знак
denom += 2; // изменить знаменатель
t = 1.0 / denom;
k++; // увеличить на 1 количество слагаемых
}
// вывод результата
Console.WriteLine(“Pi = {0}”, pi);
Console.WriteLine(“k = {0}”, k);
}
}
}

В результате выполнения вышеприведенного кода был получен следующий результат

Pi = 3.14159245358978
k = 5000000

⇑

5. Примеры решения задач, в которых оператор while есть вложенным

5.1. Цикл while есть вложенным в оператор выбора switch

В примере цикл while есть вложенным в оператор выбора switch. В зависимости от значения переменной a, выбирается соответствующий вариант нахождения суммы:

• если a=1, то вычисляется s = 5+10+…+100;
• если a=2, то вычисляется s = 5+10+…+20;
• если a=3, то вычисляется s = 5+10;
• иначе вычисляется s=100.

Программный код приложения типа Console Application, решающий данную задачу следующий:

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication3
{
class Program
{
ic void Main(string[] args)
{
int a;
int s = 0;
int i;
a = 7;
// выбор алгоритма решения задачи в зависимости от значения a
switch (a)
{
case 1:
i = 0;
while (i < 100)
{
i = i + 5;
s = s + i;
}
break;
case 2:
i = 0;
while (i < 20)
{
i = i + 5;
s = s + i;
}
break;
case 3:
i = 0;
while (i < 10)
{
i = i + 5;
s = s + i;
}
break;
default:
s = 100;
break;
}
Console.WriteLine(“s = {0}”, s);
}
}
}

В результате выполнения вышеприведенного кода, на экран будет выведен результат

s = 100

⇑

5.2. Цикл while есть вложенным в операторе цикла for

Условие задачи. Найти количество делителей любого из целых чисел от 120 до 140.

Решение. Ниже приведен программный код, решающий данную задачу для приложения типа Console Application:

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication3
{
class Program
{
ic void Main(string[] args)
{
// число делителей любого из целых чисел от 120 до 140
int i;
int up;
int t;
int k;
for (i = 120; i <= 140; i++)
{
// определить максимально-допустимое значение делителя
up = i / 2;
k = 0; // число делителей
t = 1;
while (t <= up) // вложенный цикл while
{
if (i % t == 0) // определение: делитель или не делитель
k++;
t++;
}
// Вывести на экран делитель
Console.WriteLine(“{0}: k = {1}”, i, k);
}
}
}
}

В результате выполнения вышеприведенного кода, будет выведен следующий результат

120: k = 15
121: k = 2
122: k = 3
123: k = 3
124: k = 5
125: k = 3
126: k = 11
127: k = 1
128: k = 7
129: k = 3
130: k = 7
131: k = 1
132: k = 11
133: k = 3
134: k = 3
135: k = 7
136: k = 7
137: k = 1
138: k = 7
139: k = 1
140: k = 11

⇑

Связанные темы

• Оператор условного перехода if. Полная и сокращенная формы. Конструкция if-else-if
• Оператор выбора switch

⇑

Источник