slide1 n.
Download
Skip this Video
Download Presentation
???????? ??????????????? ?????????: ????????, ???????????????,  ???????????

Loading in 2 Seconds...

play fullscreen
1 / 17

???????? ??????????????? ?????????: ????????, ???????????????,  ??????????? - PowerPoint PPT Presentation


  • 89 Views
  • Uploaded on

Основные алгоритмические структуры: линейные, разветвляющиеся,  циклические. Пример: программа, выводящая на экран сообщение: «Привет! Меня зовут Саша!». Линейная структура программы. REM Первая программа PRINT “Привет! Меня зовут Саша!” END. Пример: программа, складывающая два числа.

loader
I am the owner, or an agent authorized to act on behalf of the owner, of the copyrighted work described.
capcha
Download Presentation

PowerPoint Slideshow about '???????? ??????????????? ?????????: ????????, ???????????????,  ???????????' - raphael-ford


Download Now An Image/Link below is provided (as is) to download presentation

Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author.While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server.


- - - - - - - - - - - - - - - - - - - - - - - - - - E N D - - - - - - - - - - - - - - - - - - - - - - - - - -
Presentation Transcript
slide1

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

slide2
Пример: программа, выводящая на экран сообщение: «Привет! Меня зовут Саша!»

Линейная структура программы.

REM Первая программаPRINT “Привет! Меня зовут Саша!”END

slide3
Пример: программа, складывающая два числа

REM Сумма двух чиселa = 5b = 6c = a + bPRINT "Результат: ", cEND

REM СуммадвухчиселDIM a, b, c AS INTEGERa = 5b = 6c = a + bPRINT "Результат: ", cEND

slide4
Пример: Вычислите площадь прямоугольника по его сторонам.

REM Площадь прямоугольникаINPUT "Введите сторону а", аINPUT "Введите сторону b", bs = a * bPRINT "Площадь равна: ", sEND

slide5
Пример: Вычислить выражение 

CLS

REM Вычисление выраженияINPUT "Введите а", аINPUT "Введите b", bc = SQR(2*a*b)/(a+b)PRINT «Значение: ", сEND

slide6
Пример: Вычислите длину окружности и площадь круга по данному радиусу.

REM Вычисление длины окружности и площади кругаINPUT "Введите радиус ", rPI = 3.14l = 2 * PI * rs= PI * r * rPRINT "Длина окружности равна: ", lPRINT "Площадь равна: ", sEND

slide7
Ветвление в алгоритмах и программах.

Пример: Проверить, равно ли введенное число некоторому значению, и в случае равенства выдать  на экран сообщение о равенстве чисел.

REM сравнить число со каким-то значениемINPUT "Введите а", аIF a=7 THEN PRINT "Числа равны"END

slide8
Пример: Определить большее из двух чисел, вывести его на экран, затем - увеличить его в двое и вывести результат на экран

REM определить большее из двух чисел...INPUT "Введите а", аINPUT "Введите b", bIF a>b THENPRINT "Большее число: ", aс=2*aELSEPRINT "Большее число: ", bс=2*bEND IFPRINT "результат: ", cEND

slide9

REM определить большее из двух чисел...INPUT "Введите а", аINPUT "Введите b", bIF a=b TNENPRINT "Числа равны"с=2*aELSE    IF a>b THEN    PRINT "Большее число: ", a    с=2*a    ELSE    PRINT "Большее число: ", b    с=2*b    END IFEND IFPRINT "результат: ", cEND

slide10
Пример: Решение квадратного уравнения.Решение квадратного уравнения зависит от значения дискриминанта.

REM Решение квадратного уравненияINPUT "Введите коэффициент a: ", аINPUT "Введите коэффициент b: ", bINPUT "Введите коэффициент c: ", cd=b*b-4*a*cIF d<0 THENPRINT "Корней нет"ELSE    IF d=0 THENx=-b/(2*a)    PRINT "корень уравнения: ", x    ELSE    x1=(-b-SQR(d))/(2*a)    x2=(-b+SQR(d))/(2*a)    PRINT "корни уравнения: ", x1, x2    END IFEND IFEND

slide11
Структура "Выбор".

Пример: Выдать словесное значение числа

REM Преобразование чисел в словаINPUT "Введите число", aSELECT CASE aCASE 1PRINT "один"CASE 2PRINT "два"CASE 3PRINT "три"...CASE 10PRINT "десять"CASE ELSEPRINT "эточислонемогуперевести"END SELECTEND

1 100
Циклы в алгоритмах и программах.Пример: Вывести на экран все числа от 1 до 100. Для этого можно было бы написать следующую программу:

REM Выводчиселот 1 до 100PRINT 1PRINT 2PRINT 3PRINT 4...PRINT 98PRINT 99PRINT 100END

REM Выводчиселот 1 до 100FOR I=1 TO 100PRINT INEXTEND

slide13
Пример: Вычислить сумму двухзначных натуральных чисел.

REM Вычислить сумму двухзначных натуральных чиселFOR I=10 TO 99s=s+INEXTPRINT "Результат = ",sEND

slide14

Пример: вычислить факториал числа а (записывается так: а!). Факториал - это произведение чисел от 1 до а. Например, 5! (факториалпяти) - это 5!=1*2*3*4*5

REM Вычислитьфакториалчислаa=5f=1FOR I=1 TO af=f*INEXTPRINT fEND

slide15
циклы с предусловиемПример: Вывести все натуральные числа меньше данного.

REM Выводвсехчиселменьшеданногоa=0chislo=10DO WHILE a<chisloPRINT aa=a+1LOOPEND

slide16
Пример цикла, который будет выполнятся бесконечное число раз:

REM зацикливаниеDO WHILE a=aPRINT "Это сообщение будет выводится на экран постоянно"LOOPPRINT "А это сообщение вы не увидите никогда"END

slide17
циклы с постусловиемПример: Вычислите сумму цифр в числе.

REM СуммацифрчислаDIM a, chislo, s AS INTEGERINPUT "Введитечисло: ", chisloa=chisloDOs=s+a MOD 10a=a/10a=INT(a)LOOP UNTIL a=0PRINT "Суммацифрчисла ",chislo ," равна: ", sEND