Презентация на тему: Условный оператор в языке Паскаль

Исправьте ошибки и определите, что будет выведено на экран после выполнения программы, если с клавиатуры введены числа 2,3?

Var a,b: integer;
Program 2Task_1_13;
Begin;
Cls;
Writeln(‘Введите три целых числа’);
Readln(a,b,a)
c:=a+b;
Readln (‘a+b=',c);
Readln;
end

Исправьте ошибки и определите, что будет выведено на экран после выполнения программы, если с клавиатуры введены числа 2,3?

Program Task_1_13;
Var a,b: integer;
Begin;
Cls;
Writeln(‘Введите три целых числа’);
Readln(a,b,a)
c:=a+b;
Readln (‘a+b=',c);
Readln;
end

Исправьте ошибки и определите, что будет выведено на экран после выполнения программы, если с клавиатуры введены числа 2,3?

Program Task_1_13;
Var a,b: integer;
Begin
Cls;
Writeln(‘Введите три целых числа’);
Readln(a,b,a)
c:=a+b;
Readln (‘a+b=',c);
Readln;
end

Исправьте ошибки и определите, что будет выведено на экран после выполнения программы, если с клавиатуры введены числа 2,3?

Program Task_1_13;
Var a,b: integer;
Begin
Cls;
Writeln(‘Введите три целых числа’);
Readln(a,b);
c:=a+b;
Readln (‘a+b=',c);
Readln;
end

Исправьте ошибки и определите, что будет выведено на экран после выполнения программы, если с клавиатуры введены числа 2,3?

Program Task_1_13;
Var a,b: integer;
Begin
Cls;
Writeln(‘Введите три целых числа’);
Readln(a,b);
c:=a+b;
Readln (‘a+b=',c);
Readln;
end.

В соревнованиях по конькобежному спорту
на S метров
участвуют два спортсмена. Время, потраченное на дистанцию спортсменами равно t1 и t2 соответственно. Кто из спортсменов придет к финишу первым?

начало

Введите S, t1, t2

V1:=S/t1
V2:=S/t2

V1>V2

Победил 1й спортсмен

то

если

Тест
S t1 t2
4 3
12 2 2

4 3

6 6

v1 v2

конец

V2>V1

Победил 2й спортсмен

то

если

V1=V2

Победила дружба

то

если

Program exp2;
Var s,t1,t2,v1,v2: real;
Begin
Cls;
Writeln(‘Введите s,t1,t2’);
Readln(s,t1,t2);
V1:=S/t1;
V2:=S/t2;
If v1>v2 then
Writeln(‘победил 1й спортсмен’);
If v2>v1 then
Writeln(‘победил 2й спортсмен’);
If v1=v2 then Writeln(‘победила дружба’);
Readln;
end.

Домашнее задание:

§4.5.1 №6 

Оператор

a:=3;  b:=2;  if a>b then d:=a
else d:=b;

4. a:=2;  b:=3;  d:=4;  if a>b then d:=a
else  begin  d:=b;  d:=d+a;  end; 
d:=d*2; 

3. d:=0;  a:=1;  b:=1;  if a>0 then  if b>0 then d:=1 else d:=2;

Какое значение будет иметь переменная d после выполнения следующих операторов: 

2. a:=2;  b:=3;  d:=4;  If a>b then d:=a  else  begin  d:=b;  d:=d+a;  end;  d:=d*2;