Что такое findslide.org?

FindSlide.org - это сайт презентаций, докладов, шаблонов в формате PowerPoint.


Для правообладателей

Обратная связь

Email: Нажмите что бы посмотреть 

Яндекс.Метрика

Презентация на тему к уроку информатики Сложные условия на Паскале. Операторные скобки

Составить схему и объяснить что будет напечатано программой, если в качестве исходных данных будет выведено значение a)0,b)5,c)10Program a1;Var x,y:integer;BeginRead(x);If x5 then y:=3 else y:=4;Writeln(‘y=‘,y)End.x>5x
Операторные скобки Сложные условияПрезентация к уроку Разработала: учитель информатики лицея №1 г. Составить схему и объяснить что будет напечатано программой, если в качестве исходных Program a1;Var x,y:integer;BeginRead(x);If x5 then y:=0 else y:=1;Writeln(‘y=‘,y)End.x>5x Определить значение переменной zZ:=2Z:=-1Вывод ZZ:=0Z>2Z Составить алгоритм который определит какой четверти принадлежит точка с заданными координатами X,YXY(X>0)and(Y>0)(X0)(X0)then Верно ли, что хотя бы одно из введённых чисел a,b равно 0 Даны коэффициенты квадратного уравнения a,b,c найти корниa,b,cD:=b*b-4*a*cДаДаНетНет Обратите внимание!!! При проверке второго условия по ветке «Да» и по ветке Program korni;Var a,b,c,d,x1,x2,x:?????;Begin writeln(‘введи коэффициенты’);      readln(a,b,c);		d:=sqr(b)-4*a*c; Задачи для самостоятельного выполненияДаны стороны треугольника, определить его вид(равнобедренный, равносторонний, обычный)Даны 3
Слайды презентации

Слайд 2 Составить схему и объяснить что будет напечатано программой,

Составить схему и объяснить что будет напечатано программой, если в качестве

если в качестве исходных данных будет выведено значение a)0,b)5,c)10
Program

a1;
Var x,y:integer;
Begin
Read(x);
If x<5 then y:=1 else y:=2;
If x>5 then y:=3 else y:=4;
Writeln(‘y=‘,y)
End.





x>5

x<5

X

y


Слайд 3 Program a1;
Var x,y:integer;
Begin
Read(x);
If x

Program a1;Var x,y:integer;BeginRead(x);If x5 then y:=0 else y:=1;Writeln(‘y=‘,y)End.x>5x

x>5 then y:=0 else y:=1;
Writeln(‘y=‘,y)
End.



x>5
x


Слайд 4 Определить значение переменной z
Z:=2
Z:=-1
Вывод Z
Z:=0
Z>2
Z

Определить значение переменной zZ:=2Z:=-1Вывод ZZ:=0Z>2Z

Слайд 5 Составить алгоритм который определит какой четверти принадлежит точка

Составить алгоритм который определит какой четверти принадлежит точка с заданными координатами

с заданными координатами X,Y
X
Y
(X>0)and(Y>0)
(X0)
(X0)then writeln(‘1четверть’)else if (X0) then

writeln(‘2четверть’) else if (X<0)and(Y<0) then writeln(‘3четверть’) else writeln(‘4четверть’)



Слайд 6 Верно ли, что хотя бы одно из введённых

Верно ли, что хотя бы одно из введённых чисел a,b равно

чисел a,b равно 0
If (a=0) or (b=0) then

writeln(‘верно’) else writeln (‘неверно’)

Слайд 7 Даны коэффициенты квадратного уравнения a,b,c найти корни
a,b,c
D:=b*b-4*a*c








Да
Да
Нет
Нет

Даны коэффициенты квадратного уравнения a,b,c найти корниa,b,cD:=b*b-4*a*cДаДаНетНет

Слайд 8 Обратите внимание!!! При проверке второго условия по ветке

Обратите внимание!!! При проверке второго условия по ветке «Да» и по

«Да» и по ветке «Нет» должно быть выполнено несколько

действий!!!

Для реализации таких ситуаций на Паскале использую операторный скобки
begin оператор1;оператор2;……….end;


Слайд 9 Program korni;
Var a,b,c,d,x1,x2,x:?????;
Begin writeln(‘введи коэффициенты’);

Program korni;Var a,b,c,d,x1,x2,x:?????;Begin writeln(‘введи коэффициенты’);   readln(a,b,c);		d:=sqr(b)-4*a*c;   If d

readln(a,b,c);
d:=sqr(b)-4*a*c;
If

d <0 then writeln(‘нет корней’)
else if d=0 then begin X:=(-1*b)/(2*a);
writeln(‘два равных корня’,x) end
else begin x1:=(-1*b+sqrt(d))/(2*a);
x2:=(-1*b-sqrt(d))/(2*a);
writeln(‘первый корень’,x1,’второй
корень’,x2) еnd end.



  • Имя файла: prezentatsiya-k-uroku-informatiki-slozhnye-usloviya-na-paskale-operatornye-skobki.pptx
  • Количество просмотров: 142
  • Количество скачиваний: 0