Презентация на тему:Основы языка Visual Basic — циклические алгоритмы

ЦИКЛИЧЕСКИЕ АЛГОРИТМЫ Основы языка программирования Visual Вasic ЦИКЛИЧЕСКИЙ АЛГОРИТМ ПРЕДПОЛАГАЕТ ПОВТОРЕНИЕ ОДНИХ И ТЕХ ЖЕ ДЕЙСТВИЙ С НОВЫМИ ИСХОДНЫМИ ДАННЫМИ. Те действия, которые повторяются, принято называть телом цикла. Урок № 7 ТРИ ТИПА КОМАНД ПОВТОРЕНИЯ:ЦИКЛ «ПОКА»ЦИКЛ «ДО»ЦИКЛ «ДЛЯ»(или цикл с параметром) ОТЛИЧИЕ - СПОСОБ ПРОВЕРКИ ОКОНЧАНИЯ ЦИКЛА. Цикл «ПОКА»-повторять, пока выполняется условие условие ТЕЛО ЦИКЛА ДА НЕТ Цикл «ДО»-повторять, пока не выполнится условие условие ТЕЛО ЦИКЛА ДА НЕТ Цикл «для» или цикл с параметром выполняет тело цикла заданное число раз. Число повторений такого цикла определяется параметром – переменной, которая изменяется от начального до конечного значения с заданным шагом В алгоритмическом языке:для I от Iнач до Iкон шаг IшагТЕЛО ЦИКЛАкц Да Нет I, I нач, I кон, I шаг ТЕЛО ЦИКЛА Для- ForОт- =До- ToШаг- StepКц – Next НАЧАЛО КОНЕЦ Да Нет I=1,10,2 I КАКУЮ ЗАДАЧУРЕШАЕТ АЛГОРИТМ? For i=1 To 10 Step 2 Print i Next i FOR i= 1 ТО 5 Step 1 PRINT “ПРИВЕТ”NEXT FOR i= 0 ТО 5 Step 1 PRINT “ПРИВЕТ”NEXT FOR i= 10 ТО 20 Step 2 PRINT “ПРИВЕТ”NEXT СКОЛЬКО ПРИВЕТОВ ВЫ ПОЛУЧИТЕПОСЛЕ ВЫПОЛНЕНИЯКАЖДОГО ИЗ ЦИКЛОВ? Составить программу, печатающую любой заданный столбик таблицы умножения 3 х 1 = 33 х 2 = 63 х 3 = 93 х 4 = 123 х 5 = 153 х 6 = 183 х 7 = 213 х 8 = 243 х 9 = 273 х 10= 30 Номер столбика? 3 Практическое задание Составить программу, печатающую любой заданный столбик таблицы умножения арг n n “x” i “=“ k НАЧАЛО КОНЕЦ Да Нет i=1,10,1 Ввод n k=n*i рез ? Тип данных: n, k, i ? Целые числа, тип Integer Private Sub Command1_Click() n = Val(InputBox(“ Номер столбика?”))For i = 1 To 10 Step 1k = i * nPrint n “ x ” i ” = “ kNext iEnd Sub Dim n, i, k As Integer Внести в программу изменения, в результате которых вместо столбика таблицы умножения будет выводиться столбик квадратов чисел от 1 до 10 1 х 1 = 12 х 2 = 43 х 3 = 94 х 4 = 165 х 5 = 256 х 6 = 367 х 7 = 498 х 8 = 649 х 9 = 8110 х 10= 100 * Изменить программу так, чтобы она выводила квадраты чисел на интервале от числа а до числа b Повторение изученного Урок № 8 1. Когда используют циклические алгоритмы? 2. Как записать оператор цикла с параметром? For i=1 To n Step 1Тело циклаNext i Найти сумму N первых натуральных чисел S=1+2+3+…+N Арг NРез S Практическое задание Ввод N S=0 i, 1, n, 1 S=S+i Вывод S N=4 S=0 i=1 S=0+1=1 i=2 S=1+2=3 i=3 S=3+3=6 i=4S=6+4=10Отв:S=10 Dim n, i, S As integer Private Sub Command1_Click()N=Val(InputBox(“Сколько чисел?”))S=0For i=1 To N Step 1S=S+iNext iPrint “S=“SEnd Sub Найти сумму N первых чётных чиселS = 2+4+6+… Найти сумму N первых нечётных чиселS=1+3+5+…. Формула чётного числа 2kФормула нечётного числа 2k-1Где k- порядок числа Анализ предыдущей работы. Способы решения.s=0For i = 2 To 2*n Step 2S=S+iNext iPrint “S=”S S=0For i = 1 To n Step 1S=S+i*2Next IPrint “S=”S Найти сумму N произвольных целых чисел S=х1+ х2 + х3 +…+ хn Арг N, xРез S Урок № 9 Практическое задание Ввод N S=0 i, 1, n, 1 S=S+x Вывод S Ввод x Ввод N S=0 i, 1, n, 1 S=S+i Вывод S N=4S=0i=1Х=5S=0+5=5 i=2Х=3S=5+3=8 i=3Х=2S=8+2=10 i=4Х=10S=10+10=20Отв:S=20 Ввод N S=0 i, 1, n, 1 S=S+x Вывод S Ввод x Даны N произвольных целых чисел. Найти сумму чётных и сумму нечётных Условие проверки чётности: х/2=х\2 или x mod 2=0 Вывод S1,S2 Ввод N S1=0 S2=0 i, 1, n, 1 S1=S1+x Ввод x х/2=х\2 S2=S2+x