Чайник - модуль 3

Модуль 3. Повторение действий (циклы)

Как организовать повторение действий?
Проведи эксперимент с программой
задача: Вывести на экран квадраты натуральных чисел от 10 до 20.
PROGRAM N1;
VAR  i: integer; {счетчик цикла}
        a: integer;
BEGIN
      FOR i:=10 TO 20 DO
         BEGIN
              a:=i*i;
              writeln('квадрат числа',i,'=',a);
          END;
END.

подробнее  прочитать стр.21-22

Z3.1 Напечатать таблицу перевода дюймы в сантиметры в виде:
1 дюйм = 2.54 см
2 дюйм = 5.08 см и т.д. до 10

Z3.2 Спортсмен в 1 день пробежал 10 км., в каждый следующий пробегал на 10% больше. Напечатать таблицу пробега за 5 дней.

Для решения следующих задач прочитать стр.23 - базовые циклические алгоритмы:
- определения суммы чисел 
- определения количества чисел, удовлетворяющих заданному условию

Z3.3 Друг должен вам 2000 руб. и предложил отдавать частями, а именно:
1 день - 2руб.
2 день - 4руб.
3 день - 8 руб и так 10 дней. 
Программа должна выдавать сообщение да, согласен или нет

Z3.4 Сгенерировать случайным образом оценки по математике за неделю и 
определить количество 3, 4 и 5 

Часто в задачах есть повторение действий, но неизвестно сколько раз действия 
будут повторяться. Для этого на помощь нам придет Цикл с предусловием WHILE

Задача 1. Найти количество чисел, сумма которых превысит 100.
PROGRAM N;
var  k:integer;
      s:integer;
begin
      s:=0;   k:=0;
     while  s<=100  do
        begin
             k:=k+1;
             s:=s+k
        end;
     writeln(‘количество слагаемых=’,k);
end.     
подробнее можно  прочитать на стр.27-28

Z3.5 Ввести целое число и найти сумму его цифр.
    Пример:
        Введите целое число:
        1234
        Сумма цифр числа 1234 равна 10.
Мы решали задачу с определением цифр  известного числа - двухзначного, трехзначного и т.д. Задача усложнилась - число цифр в задаче неизвестно

Есть еще один оператор цикла с постусловием Repeat
прочитать можно на 31-34стр.

Z3.6 Натуральное число р называется простым, если оно делится только на 1 и на себя. По соглашению 1 не считают простым числом. Начало последовательности простых чисел имеет вид : 2,3,5,7,11,13, 17, ....
Сколько простых чисел сумеешь найти? А сколько их найдено?
Про простые числа можно прочитать здесь Википедия  или Традиция

Определить количесво простых чисел, из введеных с клавиатуры https://pas1.ru/prime-numbers