Рабочие листы
к вашим урокам
Скачать
1 слайд
Связь блок-схемы
Романенко Т.Н.,
учитель информатики МАОУ СОШ № 53 г. Томска
и программы на языке Pascal
2 слайд
ЛИНЕЙНЫЙ АЛГОРИТМ
Задача 1.
С клавиатуры вводятся
два натуральных
числа a и b.
Вывести на экран
их сумму, разность,
произведение и частное
3 слайд
ЛИНЕЙНЫЙ АЛГОРИТМ
a, b
sum, razn,
pr, chast
НАЧАЛО
sum:=a + b
razn:=a – b
pr:=a * b
chast:=a / b
КОНЕЦ
Begin
Writeln(‘введите два числа а и b’);
Readln(a,b);
Var a,b :Integer; sum,razn,pr :Integer;
chast :Real;
sum:=a + b;
razn:=a – b;
pr:=a * b;
chast:=a / b;
Writeln(‘sum=’,sum:2);
Writeln(‘razn=’,razn:2);
Writeln(‘pr=’,pr:2);
Writeln(‘chast=’,chast:2:2);
Readln; End.
4 слайд
АЛГОРИТМ ВЕТВЛЕНИЕ
Задача 2.
С клавиатуры вводятся
коэффициенты A, B, C
квадратного уравнения.
Вычислить корни
квадратного уравнения
5 слайд
АЛГОРИТМ ВЕТВЛЕНИЕ
A, B, C
Корней
нет
НАЧАЛО
D:=Sqr(B) – 4*A*C
КОНЕЦ
Begin
Writeln(‘введите коэффициенты A,B,C’);
Readln(A,B,C);
Var A,B,C :Integer;
D :Real; x,x1,x2 :Real;
Readln; End.
D<0
D:=Sqr(B) – 4*A*C;
IF D<0
x:=-B/(2*A)
да
нет
writeln(‘корней нет’)
then
D=0
else
IF D=0
then
да
нет
x
x1:=-B+Sqrt(D)/(2*A)
x2:=-B-Sqrt(D)/(2*A)
x1,x2
Begin
x:=-B/(2*A);
else
begin
end;
x1:=-B+Sqrt(D)/(2*A);
x2:=-B-Sqrt(D)/(2*A);
writeln(‘x1=‘,x1:2:2);
writeln(‘x2=‘,x2:2:2);
writeln(‘x=‘,x:2:2);
end
6 слайд
АЛГОРИТМ ЦИКЛА СО СЧЕТЧИКОМ
Задача 3.
Вывести на экран
сумму первых 50 членов
натурального ряда
7 слайд
АЛГОРИТМ ЦИКЛА СО СЧЕТЧИКОМ
S
НАЧАЛО
S:=0
КОНЕЦ
Begin
S:=0;
Var N:Integer; S:Integer;
Readln;
End.
For N:=1 to 50 do
S:=S + N
writeln(‘S=‘,s:2);
N=1,50,1
S:=S + N;
8 слайд
АЛГОРИТМ ЦИКЛА С ПРЕДУСЛОВИЕМ
Задача 4.
С клавиатуры вводятся
целые числа.
Программа подсчитывает
их сумму до тех пор,
пока не будет введено
отрицательное число
9 слайд
АЛГОРИТМ ЦИКЛА С ПРЕДУСЛОВИЕМ
sum
НАЧАЛО
sum:=0
a:=1
КОНЕЦ
Begin
sum:=0;
a:=1;
Var sum, a :Real;
Readln;
End.
While a>=0 do
sum:=sum + a
writeln(‘Введите число’);
Readln(a);
sum:=sum + a;
A<0
a
end;
writeln(‘Сумма чисел=’, sum:2:2);
да
нет
begin
10 слайд
АЛГОРИТМ ЦИКЛА С ПОСТУСЛОВИЕМ
Задача 5.
С клавиатуры вводятся
целые числа.
Программа подсчитывает
их сумму до тех пор,
пока не будет введено
отрицательное число
11 слайд
АЛГОРИТМ ЦИКЛА С ПОСТУСЛОВИЕМ
S
НАЧАЛО
S:=0
A:=0
КОНЕЦ
Begin
S:=0;
A:=0;
Var A:Integer; S:Integer;
Readln;
End.
repeat
S:=S + A
writeln(‘Введите новое число’);
Readln(a);
S:=S + A;
A<0
A
until a<0;
writeln(‘Сумма чисел=’, s:2 );
нет
да
Рабочие листы
к вашим урокам
Скачать
Презентация по информатике на тему "Связь алгоритма в виде блок-схемы и программы на языке программирования Pascal" составлена для уроков изучения тем "Алгоритмизация" и "Программирование" в 9 классе.
В презентации рассмотрены три вида алгоритмов: линейный, ветвление и три вида циклов.
Презентация показывает связь участков блок-схемы и описание данных команд в программе на языке программирования в доступной форме.
Данную презентацию можно использовать при изучении цикла уроков, начиная с линейной структуры и до изучения циклических алгоритмов.
6 665 220 материалов в базе
Настоящий материал опубликован пользователем Романенко Татьяна Николаевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материал
Ваша скидка на курсы
40%
Курс профессиональной переподготовки
500/1000 ч.
Курс профессиональной переподготовки
300/600 ч.
Курс профессиональной переподготовки
300/600 ч.
Мини-курс
3 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.