1 слайд 2 слайд 3 слайд. Program perimetr1; Var a,b,P:integer; Begin writeln (a,b); readln (a,b); P:=(a+b)*2; writeln (perimetr =,P); readln; end. Program.

Презентация:



Advertisements
Похожие презентации
Самостоятельная работа по теме «Условный переход».
Advertisements

Задачи по теме Организация ветвления на языке Паскаль урок для 9 класса Селиверстова Ольга Николаевна учитель информатики МБОУ СОШ 17 г.Саров Нижегородской.
Разместите разделы программы в нужном порядке и назовите, что означает каждый раздел.
Основы языка Pascal Тема. Оператор ветвления. Алгоритм Алгоритм – это четко определенный план действий для исполнителя.
Тема урока: Преподаватель Шатц К.Э.. 1. Какие числа относятся к типу Integer Real 2. Исправь ошибки в программе Program 2 pr; Var b,s: real; Begin Writeln.
P ASCAL ABC Разветвляющиеся вычислительные процессы.
Виды алгоритмических структур Линейный алгоритм Разветвляющийся алгоритм Циклический алгоритм ?
Оператор ветвления. Для реализации ветвления в программе используют условный оператор (оператор ветвления). Условный оператор в полной форме записывается.
Ветвление Полное ветвление Если УСЛОВИЕ то КОМАНДА 1 иначе КОМАНДА 2; IF УСЛОВИЕ THEN КОМАНДА 1 ELSE КОМAНДА 2;
Автор: Зайнуллина Вера Викторовна, МОУ СОШ с УИОП п. Богородское.
Все познается через труд, через преодоление ошибок (собственных), через процесс решения задач.
ВЕТВЯЩАЯСЯ АЛГОРИТМИЧЕСКАЯ КОНСТРУКЦИЯ. Краткая форма оператора if (условие) then (оператор 1); (оператор 2); (оператор 3); …………….. (оператор N); Если.
Урок в 10 классе Ветвление. Условный оператор. Сложные условия.
Вложенные условные операторы. Рассмотрим задачу если х>0 то у вычислить по формуле у=х-12 иначе если х=0 то у вычислить по формуле у=5 иначе у вычислить.
Команда 1 Команда 2 Команда N... Как называются алгоритмы такой структуры? Линейные.
Pascal: Условный оператор. Условный оператор позволяет проверить некоторое условие и в зависимости от результатов проверки выполнить то или иное действие.
Это алгоритмы, предусматривающие многократное повторение одного и того же действия над ноывми данными. Цикл называется арифметическим, если заранее известно.
Тест по информатике Разветвляющиеся алгоритмы. Условный оператор 9 класс.
Оператор ветвления : if then else ; Вложенное ветвление : if then else else ;
I := 1, 20 вывод В массиве нет числа X PROGRAM VAR, INTEGER Rand FORTO Example2 ; :=:= i 120DO BEGIN WRITE() : ARRAY [ ] OF i ; BEGIN ; : NumberX.
Транксрипт:

1 слайд 2 слайд 3 слайд

Program perimetr1; Var a,b,P:integer; Begin writeln (a,b); readln (a,b); P:=(a+b)*2; writeln (perimetr =,P); readln; end. Program primer1; Var a,b:integer; Begin writeln (a, b); readln (a, b); If (a>b) then writeln(max=,a) else writeln (max=,b); readln; end.

Program primer2; Var a,b:integer; Begin writeln (a,b); readln (a,b); If (a>b) then writeln(a:4,b:4) else writeln (1:4,1:4); readln; end. Program primer3; Var a,b:integer; Begin writeln (a,b); readln (a,b); If (a<b) then writeln(-a:3,-b:3) else writeln (a+b); readln; end.

Program primer 3; Var a,b:integer; Begin; writeln (a,b); readln (a,с); If (a<b) then writeln(a/b,-b:3) else writeln (a+b) readln end. Program primer 3; Var a,P:integer; Begin; writeln (a,b); readln (a,с); P=a*b/2 else writeln (a,b) readln end.

Задача 1. Даны 3 числа a,b,c. Вывести на экран их сумму, если а > b>c, и оставить без изменения в противном случае. Program primer1; Var a,b,c:integer; Begin writeln (a,b,c); readln (a,b,c); If (a>b) or (b>c) then writeln(a+b+c) else writeln (a,b,с); readln; end.

Даны 3 числа a,b,c. Вывести на экран противоположные числа, если а b>c и оставить без изменения в противном случае.

Program primer2; Var a,b,c:integer; Begin writeln (a,b,c); readln (a,b,c); If (a<b) or (b<c) then writeln(-a:4,-b:4,-c:4); If (a>b) or (b>c) then writeln (0:4,0:4,0:4) else writeln (a:4,b:4,с:4); readln; end.

Дома: Задача 2. Даны 3 числа a,b,c. Вывести на экран произведение, если а = b =c, вывести двойки, если a>b>c и оставить без изменения в противном случае. Задача 3. Даны 2 числа b,c. Вывести на экран противоположные числа, если b<c, и оставить без изменения в противном случае.