Школьные учебники / Презентации по предметам » Презентации » Презентации по Информатике » Алгоритм с ветвлением в среде программирования Turbo Pascal

Алгоритм с ветвлением в среде программирования Turbo Pascal

Алгоритм с ветвлением в среде программирования Turbo Pascal - Скачать Читать Лучшую Школьную Библиотеку Учебников
Смотреть онлайн
Поделиться с друзьями:
Алгоритм с ветвлением в среде программирования Turbo Pascal:
Презентация на тему Алгоритм с ветвлением в среде программирования Turbo Pascal к уроку по информатике

Презентация "Алгоритм с ветвлением в среде программирования Turbo Pascal" онлайн бесплатно на сайте электронных школьных учебников edulib.ru

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

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

Цели урока: 1. Cпособствовать осознанию и осмыслению новой учебной информации; 2. Сформировать предс
2 слайд

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

1. Какие числа относятся к типу Integer Real 2. Исправь ошибки в программе Program 2 pr; Var b,s: re
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 слайд

позволяет выбрать те или иные части программы в зависимости от условий

If then else ; Program My2; Var x,y: integer; Begin Writeln (‘Введите два числа’) Readln( х, у); If
5 слайд

If then else ; Program My2; Var x,y: integer; Begin Writeln (‘Введите два числа’) Readln( х, у); If x>y Then Writeln(x) else Writeln(y); End.

If then ; Пусть даны два числа. Если первое больше второго по абсолютной величине, то необходимо уме
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.

в которой значение переменной с вычисляется по формуле: a+b, если а –нечетное и a*b, если а – четное
7 слайд

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

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

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

Program ; Var a,b,c,x,y: real; Begin Writeln (‘Введите числа a, b и с’) Readln (a,b,c); D:=sqr(b)-4*
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 слайд

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

Отзывы на edulib.ru"Алгоритм с ветвлением в среде программирования Turbo Pascal" (0)
Оставить отзыв
Прокомментировать