Презентация на тему "Алгоритм с ветвлением в среде программирования Turbo Pascal"

Презентация: Алгоритм с ветвлением в среде программирования Turbo Pascal
1 из 10
Ваша оценка презентации
Оцените презентацию по шкале от 1 до 5 баллов
  • 1
  • 2
  • 3
  • 4
  • 5
3.3
2 оценки

Комментарии

Нет комментариев для данной презентации

Помогите другим пользователям — будьте первым, кто поделится своим мнением об этой презентации.


Добавить свой комментарий

Аннотация к презентации

Интересует тема "Алгоритм с ветвлением в среде программирования Turbo Pascal"? Лучшая powerpoint презентация на эту тему представлена здесь! Данная презентация состоит из 10 слайдов. Средняя оценка: 3.3 балла из 5. Также представлены другие презентации по информатике для 9-11 класса. Скачивайте бесплатно.

Содержание

  • Презентация: Алгоритм с ветвлением в среде программирования Turbo Pascal
    Слайд 1

    30.12.2016 Тема урока: Алгоритм с вертвлением в среде программирования Turbo Pascal Костина Вера Павловна МАОУ «СОШ № 2» МО «Лениногорского муниципального района» РТ

  • Слайд 2

    Цели урока: 1. Cпособствовать осознанию и осмыслению новой учебной информации; 2. Сформировать представление о принципе работы условного оператора; сформировать навыки программирования в среде TP 3. Формирование ИКТ- компетентности; развитие алгоритмического мышления. 4. Способствовать формированию партнерских отношений в классе.

  • Слайд 3

    1. Какие числа относятся к типу Integer Real 2. Исправь ошибки в программе Program 2 pr; Var b,s: real; Begin Writeln (‘Введите числа b и с’) Readln( b,c); A=b+c; Write ln ( ‘a=’,a); End. 3.Запиши на языке программирования математическое выражение х2+2ху-у2 4.Переведите запись с языка программирования Паскаль на математический язык Sqrt(x)*3 – (a+2)/b

  • Слайд 4

    позволяет выбрать те или иные части программы в зависимости от условий Z:= X Z:= Y X>Y

  • Слайд 5

    Полная форма условного оператора

    If then else; Program My2; Var x,y: integer; Begin Writeln (‘Введитедва числа’) Readln( х, у); If x>y Then Writeln(x) else Writeln(y); End. Что появится на экране после выполнения данной программы? Подчеркните условный оператор?

  • Слайд 6

    Неполная форма условного оператора

    If then; Пусть даны два числа. Если первое больше второго по абсолютной величине, то необходимо уменьшить первое в пять раз. Иначе число оставить без изменения. Program My3; var x, y: real; Begin writeln (‘Введите числа х и у’); readln (x,y); If abs(x) >abs(y) Then x:=x/5; Write(‘x=‘, x, ‘y=‘, y); end.

  • Слайд 7

    Запиши условный оператор,

    в которой значение переменной с вычисляется по формуле: a+b, если а –нечетное и a*b, если а – четное. If a div 2=0 then Write (‘Число чётное’)else write (‘Число нечетное’);

  • Слайд 8

    который вычисляет значение функции: If a >3 then y:=x2+5 else y:=x- 8;

  • Слайд 9

    Программа решения квадратного уравнения.

    Program ; Var a,b,c,x,y: real; Begin Writeln (‘Введитечисла a, b ис’) Readln(a,b,c); D:=sqr(b)-4*a*c; If d>= 0 then begin x:=(-b+sqrt(d))-2*a; y:=(-b-sqrt(d))-2*a; Write ln ( ‘x=’,x, ‘у=’,y); end; Else write (‘Корней нет’); End.

  • Слайд 10

    Напишите фрагмент программы, подсчитывающих сумму только положительных из трёх данных чисел. Дано трехзначное число. Напишите программу определения, является ли оно полидромом («перевертышем»)

Посмотреть все слайды

Сообщить об ошибке