Алгоритм цикл

Синтаксис оператора цикл for:

For i: =n1 to n2 do begin {последовательность операторов}; end; Либо: For i: =n2 downto n1 do begin {последовательность операторов}; end;

Где i – это счетчик цикла, который обязательно должен быть объявлен в разделе var, и иметь целочисленный тип;

n1 – начальное значение счетчика цикла;

n2 – конечное значение счетчика цикла.

Шаг изменения переменной – счетчика циклов может быть равен только 1(если используется ключевое слово to) или –1 (если используется ключевое слово downto).

Категорически не рекомендуется проводить какое–либо изменение переменной – счетчика цикла внутри тела цикла.

Задачи цикл FOR:

1) Вывести 30 раз слово НКШИ в строчку через запятую;

2) Напечатать " столбиком":

а) все целые числа от 20 до 35;

б) квадраты всех целых чисел от 10 до b (значение b вводится с клавиатуры; b≥ 10);

в) все двузначные числа в обратном порядке;

г) квадраты всех целых чисел от a до b (значение a и b вводятся с клавиатуры; b≤ a).

3) Составить таблицу умножения

а) на 9.

б) на число n (значение n вводится с клавиатуры; 1≤ n≤ 9).

4) Напечатать таблицу соответствия между весом в фунтах и весом в килограммах для значений 1, 2,., 10 фунтов (1 фунт = 453г).

5) Напечатать таблицу перевода 1, 2,..., 20 долларов США в рубли по текущему курсу (значение курса вводится с клавиатуры).

6) Одна штука некоторого товара стоит 20.4 руб. Напечатать таблицу стоимости 2, 3,.., 20 штук этого товара.

7) Рассчитать значения y для значений x, равных 4, 5,..., 12:

а) y = 2t2 + 5, 5t – 2, у = 3, 5t2 – 7t + 16,

б) t = x + 2. t = 4a.

8) Найти:

а) сумму всех целых чисел от 10 до 50;

б) сумму всех целых чисел от a до 50 (значение a вводится с клавиатуры; a≤ 50);

в) сумму всех целых чисел от -10 до b (значение b вводится с клавиатуры; b≥ -10);

г) сумму всех целых чисел от a до b (значения a и b вводятся с клавиатуры; b≥ a).

9) Найти:

а) среднее арифметическое всех целых чисел от 1 до 100;

б) среднее арифметическое всех целых чисел от 100 до b (значение b вводится с клавиатуры; b≥ 100);

в) среднее арифметическое всех целых чисел от a до 200 (значение a вводится с клавиатуры; a≤ 200);

10) Найти:

а) сумму квадратов всех целых чисел от a до 50 (значение a вводится с клавиатуры; 0≤ a≤ 50);

б) сумму квадратов всех целых чисел от 1 до n (значение n вводится с клавиатуры; 1≤ n≤ 100);

в) сумму квадратов всех целых чисел от a до b (значение a и b вводится с клавиатуры; b≥ a).

11) Дано натуральное число n. Найти сумму n2 + (n+1)2 +... + (2n)2.