Презентация на тему Использование алгоритма при решении задач на Паскале

чем отличие условных алгоритмов с полным и неполным ветвлением?
какова

структура программы на Паскале?
какие типы переменных используются в языке Паскаль?
какова структура ветвления на Паскале?
сколько операторов разрешает синтаксис IF ставить после THEN и ELSE?
как преодолеть эту трудность? Как записывается составной оператор?
что такое форматируемый вывод и для чего он нужен?

введенным значениям определить, можно ли по этим углам построить

треугольник?

Алгоритм решения:
запрашиваем значения углов и вводим их с клавиатуры;
анализируем сумму углов: если она равна 1800, то сообщаем «треугольник существует», в противном случае выводим «треугольник не существует».

then write (‘треугольник существует’)
else write

(‘треугольник не существует’);
end.

по введенным углам построить можно, уточнить, а какой именно

треугольник будет построен – прямоугольный, остроугольный или тупоугольный?

При решении задачи будем использовать вложенные условия, а также сложные условия, связанные логическим «ИЛИ» (OR).

a=90)or(b=90)or(c=90)
да
нет
нет
да
тупоуг.треуг.
остроуг.треуг.
комбинируем оба типа ветвления
Блок-схема решения задачи №2

then write (‘Нет’)
else

if (a=90) or (b=90) or (c=90) then write
(‘прямоуг.треуг’);
if (a>90) or(b>90) or (c>90) then write
(‘тупоуг.треуг’)
else write (‘остроуг.треуг’);
end.

R2,
а также вид соединения (1-последовательное или 2-параллельное). Посчитать и

вывести значение общего сопротивления цепи R0.

При последовательном соединении:

При параллельном соединении:

R0 = R1 + R2

R0 = R1* R2/( R1+ R2 )

тип цепи k
вывод r0

два сопротивления);
readln (r1,r2);
writeln(‘введите тип соединения:

1- последов., 2 – паралл.');
readln (k);
if k=1 then r0 = r1 + r2
else
r0 = r1 * r2 / (r1 + r2);
write (‘общее сопротивление цепи = ‘, r0 :4 :1);
end.

анализирует введенные числа и выводит сообщение – какой четверти

координатной плоскости принадлежит эта точка.

Алгоритм решения:
- запросить и ввести координаты точки;
проанализировать четыре различных комбинации чисел;
для каждого случая сделать вывод соответствующего сообщения.
Решение задачи будет более простым, если использовать неполное ветвление.

(a,b);
if (a > 0) and (b > 0) then

write (‘1 четверть’) ;
if (a < 0) and (b > 0) then write (‘2 четверть’) ;
if (a < 0) and (b < 0) then write (‘3 четверть’) ;
if (a > 0) and (b < 0) then write (‘4 четверть’) ;
end.