1. Какие числа относятся к типу Integer Real 2. Исправь ошибки в программе Program 2 pr; Var b,s: real; Begin Writeln (Введите числа b и с) Readln( b,c); - презентация

1 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

2 Program ; Var a,b,c,x,y: real; Begin Writeln (Введите числа a, b и с) Readln( a,b,c); D:=sqr(b)-4*a*c; x:=(-b+sqrt(d))-2*a; y:=(-b-sqrt(d))-2*a; Write ln ( x=,x, у=,y); End.

3 Тема урока:

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:=x 2+ 5 else y:=x- 8;

9 1.Блок схема 2. Запусти файл my5_1; - поставь «:» после оператора Writeln(x). Почему появилось сообщение об ошибке. - введи два равных числа. Измени программу так, чтобы она выводила на экран сообщение «Числа равны»

10 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.

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