Циклические алгоритмы

Задача 1. Вычислить значение функции при x=2, 3, 4, …, 50. Определение. Циклическим называют алгоритм, в котором получение результата обеспечивается многократным выполнением одних и тех же операций.

Цикл с параметром For Начальное значение переменной х: 2 Конечное значение: 50 Шаг изменения: 1

В программе используется оператор цикла For, для которого существуют два варианта: 1) For счетчик:=нач знач То кон знач Do оператор; 2) For счетчик:=нач знач Downto кон знач Do оператор; В первом варианте шаг изменения счетчика равен 1, во втором варианте - -1.

Решим задачу 1. Вычислить значение функции при x=2, 3, 4, …, 50. Решение var y:real; x:integer; begin for x:=2 to 50 do begin y:=x*x*x+3*x-5; writeln ('при х=',x,' y=',y); end; end.

Задачи 2. Выполнить готовую программу: 1) For x:=1 To 5 do writeln(x*x); Выполнение

2) For a:=5 Downto 1 do writeln (2*a); Выполнение

3) s:=0; For i:=1 To 5 Do s:=s+i; writeln(s); Выполнение =15

3. Составить программу проверки знаний учеником таблицы умножения. Компьютер задает ученику 10 вопросов на умножение чисел от 2 до 9. На каждое задание ученик вводит свой ответ, компьютер сообщает, верный ответ или нет. Решение Var x,y,i,z: Integer; Begin randomize; For i:=l To 10 Do Begin x:=random(8)+2; у:=random(8)+2; WriteLn ('Сколько будет ', x, *,y,=); Read(z); If z=x*y Then WriteLn('Правильно!') Else WriteLn('Неправильно!'); End; End.

Датчик случайных чисел - функция random (х), выдает случайное целое число от 0 до х-1. Процедура randomize - производит установку случайного начального состояния датчика случайных чисел. Благодаря этому при повторном выполнении программы будут получаться разные последовательности случайных чисел.

Д/з. §21, стр Решение задач 5, 6 стр. 149