начало
Ввод А
А<0
положительное
отрицательное
конец
нет
да
1. Блок-схема
начало
Ввод А
А<0
конец
нет
да
1. Блок-схема
А+А
Вывод А
начало
Ввод А
А<0
конец
нет
да
1. Блок-схема
А+10
Вывод А
А-2
2.Код программы
var A: integer;
begin
writeln(‘введите À');
readln(A);
if A>=0 then
A:=A-2 else
A:=A+10;
writeln (‘А=',A);
end.
начало
Ввод х
Х>=0
конец
нет
да
1. Блок-схема
Y=cos2x
Вывод Y
Y=sin2x
начало
Ввод х
х<=0
конец
нет
да
1. Блок-схема
Y=x
Вывод Y
Y=1-sin2x
2.Код программы
var x,y: real;
begin
writeln(‘введите х');
readln(x);
if x<=0 then
y:=x else
y:=1-sqr(sin(x));
writeln ('Y=',Y);
end.
начало
Ввод х
Х>0
конец
нет
да
1. Блок-схема
Y=cos2x
Вывод Y
Y=tg x
2.Код программы
var x,y: real;
begin
writeln(‘введите x');
readln(x);
if x>0 then
y:=sqr(cos(x)) else
y:=sin(x)*cos(x);
writeln ('Y=',Y);
end.
начало
Ввод А
А mod
2=0
конец
нет
да
1. Блок-схема
С=А/10
Вывод С
С=А*3
2.Код программы
var A: integer;
C:real;
begin
writeln(‘введите A');
readln(A);
if A mod 2=0 then
C:=A/10 else
C:=A*3;
writeln ('A=',C);
end.
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть