Алгоритмы с ветвящей структурой - презентация, доклад, проект скачать

Нажмите для полного просмотра!

Алгоритмы с ветвящей структурой, слайд №1

Алгоритмы с ветвящей структурой, слайд №2

Алгоритмы с ветвящей структурой, слайд №3

Алгоритмы с ветвящей структурой, слайд №4

Алгоритмы с ветвящей структурой, слайд №5

Алгоритмы с ветвящей структурой, слайд №6

Алгоритмы с ветвящей структурой, слайд №7

Алгоритмы с ветвящей структурой, слайд №8

Алгоритмы с ветвящей структурой, слайд №9

Алгоритмы с ветвящей структурой, слайд №10

Алгоритмы с ветвящей структурой, слайд №11

Алгоритмы с ветвящей структурой, слайд №12

Алгоритмы с ветвящей структурой, слайд №13

Алгоритмы с ветвящей структурой, слайд №14

Алгоритмы с ветвящей структурой, слайд №15

Алгоритмы с ветвящей структурой, слайд №16

Алгоритмы с ветвящей структурой, слайд №17

Алгоритмы с ветвящей структурой, слайд №18

Содержание ▲

Вы можете ознакомиться и скачать презентацию на тему Алгоритмы с ветвящей структурой. Доклад-сообщение содержит 18 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

Слайды и текст этой презентации

Слайд 1

Описание слайда:

Алгоритмы с ветвящей структурой Урок 30.

Слайд 2

Описание слайда:

Цель: отработать навык составления программ с ветвящейся структурой.

Слайд 3

Описание слайда:

Дана программа: Дана программа: Program urok; Var m, n, s, p: integer; Begin Read (m,n); s:=m+n; p:=m*n; if m>n then begin m:=s; n:=p; end else begin m:=p; n:=s; end; Write ('m=', m, ‘n=',n); End. Для решения какой задачи она предназначена?

Слайд 4

Описание слайда:

Какие структуры называются ветвлением?

Слайд 5

Описание слайда:

Какие конструкции ветвления бывают?

Слайд 6

Описание слайда:

Задание 1. Составьте программу, определяющую, является ли число A кратным числу В.

Слайд 7

Описание слайда:

Решение: Решение: Program primer; Var a, b :integer; Begin Write('введите два числа'); Read(a,b); If a mod b=0 then writeln('a кратно b') else write ('а не кратно b'); End.

Слайд 8

Описание слайда:

Задание 2. Вводятся две четвертные оценки по математике и русскому языку. Выведите на экран надпись «Молодец!», если их сумма больше или равна 9, иначе надпись — «Подтянись!».

Слайд 9

Описание слайда:

Решение: Решение: Program primer; Var a, b: integer; Begin Write('введите четвертные оценки по математике и русскому языку'); Read(a,b); If a+b>=9 then writeln('Молодец!') else writeln('Подтянись!'); End. Использование операторных скобок внутри условного оператора называется составным оператором.

Слайд 10

Описание слайда:

Задание 3. Составьте программу сортировки по возрастанию значений трех переменных: А, В, С.

Слайд 11

Описание слайда:

Решение: Решение: Program Рг; Var S1, S2, S3, С: Integer; Begin Writeln(' Введите три числа'); Readln(S1,S2,S3); If S1>S2 then begin C:=S1; S1:=S2; S2:=C; end; {Меняем местами содержимое S1 и S2} If S2>S3 then begin C:=S2; S2:=S3; S3:=C; end; {Меняем местами содержимое S2 и S3} If S1>S2 then begin C:=S1; S1:=S2; S2:=C; end; {Меняем местами содержимое SI и S2} Writeln('Числа в порядке возрастания:', S1,S2,S3) End.

Слайд 12

Описание слайда:

Задание 4. Составьте программу решения линейного уравнения вида Ах — В.

Слайд 13

Описание слайда:

Решение: Решение: Program linear_equation; Var a, b: real; Begin Write('введите коэффициенты а и b:'); Readln(a, b); If a0 then write('x0',-b/a) Else If b=0 then write('Kopeнь любое число') Else write('Kopней нет'); End.

Слайд 14

Описание слайда:

Задание 5. Составьте программу решения квадратного уравнения.

Слайд 15

Описание слайда:

Решение: program kv; var a,b,c,D,x1,x2:real; begin Решение: program kv; var a,b,c,D,x1,x2:real; begin Read (a,b,c); D:=b*b-4*a*c; if D

Слайд 16

Описание слайда:

Домашнее задание Дано: а, b, с- стороны предполагаемого треугольника. Требуется сравнить длину каждого отрезка с суммой двух других. Если хотя бы в одном случае отрезок окажется больше суммы двух других, то треугольника с такими сторонами не существует. Написать программу, определяющую по координатам точки, в какой четверти она находится.

Слайд 17

Описание слайда:

Ответы: Ответы: 1.var а, b, с: integer; begin write ('Длины сторон:'); readln (a,b,c); if (a

Слайд 18

Описание слайда:

2. Var x, y: real; begin 2. Var x, y: real; begin write('x='); read(x); write('y='); readln(y); write('Hoмep четверти координатной плоскости:'); if (x>0) and (y>0) then writeln (‘I’) Else if (x0) then writeln('II') else if (x