var a, b, с: integer;
begin
write('Введите два числа: ');
readln(a, b);
if a < b then с := a + 1 else с := b + 1;
repeat с := с - 1
until (a mod с = 0) and (b mod с = 0);
write('NOD = ', с)
end.
//2. Алгоритм с вычитанием (цикл while)
var a, b: integer;
begin
write('a = ');
readln(a);
write('b = ');
readln(b);
while a <> b do
if a > b then
a := a - b
else
b := b - a;
writeln('NOD = ', a);
end.
Продолжаем тему обучения работы в PowerPoint.
Сегодня рассмотрим как сделать красивые переходы между слайдами. К сожалению, многие не пользуются этой прекрасной возможностью разнообразить свою презентацию. А зря.
Без этих переходов между слайдами презентация в PowerPoint не даёт того полного эффекта, который можно получить применяя это. С красивыми и правильно подобранными переходами презентация просматривается гораздо интереснее.
Я не случайно сказал, что переходы должны быть правильно подобраны. Если Вы не правильно подберёте их, то презентацию можно только украсить, а просто испортить.
Например, если установить один переход к каждому слайду влево или вправо. То, при просмотре такой презентации, может появиться чувство головокружения, я не шучу. Тем более,
если слайды меняются часто.
Причём, надо также уместно ставить звуки, которые могут сопровождать смену слайдов или можете поставить свой звуковой файл. Это тоже возможно. Хотя, к этому также надо подходить обдуманно и в некоторых переходах их вообще не надо ставить.
В общем, выбирайте, пробуйте экспериментируйте, подходите к процессу творчески и создадите прекрасную презентацию в программе PowerPoint.