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

Содержание

Слайд 2

Исправьте ошибки и определите, что будет выведено на экран после

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

программы, если с клавиатуры введены числа 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

Слайд 3

Исправьте ошибки и определите, что будет выведено на экран после

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

программы, если с клавиатуры введены числа 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

Слайд 4

Исправьте ошибки и определите, что будет выведено на экран после

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

программы, если с клавиатуры введены числа 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

Слайд 5

Исправьте ошибки и определите, что будет выведено на экран после

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

программы, если с клавиатуры введены числа 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

Слайд 6

Исправьте ошибки и определите, что будет выведено на экран после

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

программы, если с клавиатуры введены числа 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.

Слайд 7

Условный оператор в языке Паскаль

Условный оператор
в языке Паскаль

Слайд 8

В соревнованиях по конькобежному спорту на S метров участвуют два

В соревнованиях по конькобежному спорту
на S метров
участвуют два спортсмена.

Время, потраченное на дистанцию спортсменами равно t1 и t2 соответственно. Кто из спортсменов придет к финишу первым?
Слайд 9

начало Введите S, t1, t2 V1:=S/t1 V2:=S/t2 V1>V2 Победил 1й

начало

Введите 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

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

то

если

Слайд 10

Program exp2; Var s,t1,t2,v1,v2: real; Begin Cls; Writeln(‘Введите s,t1,t2’); Readln(s,t1,t2);

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.
Слайд 11

Домашнее задание: §4.5.1 №6

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

§4.5.1 №6 

Слайд 12

Оператор

Оператор

Имя файла: Условный-оператор-в-языке-Паскаль.pptx
Количество просмотров: 59
Количество скачиваний: 0