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

Содержание

Слайд 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 метров
участвуют два спортсмена. Время, потраченное

на дистанцию спортсменами равно t1 и t2 соответственно. Кто из спортсменов придет к финишу первым?

Слайд 9

начало

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

Слайд 12

Оператор

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