1.Начало
2.Возьму телеграммы.
3.Проверь, есть ли на них марки. Если нет, то:
Посчитай нужное количество марок.
Наклей марки.
4.Посмотри адрес.
5.Доберись до дома.
6.Постучи в дверь.
7.Отдай телеграмму.
(И несколько раз)
8.Конец.
Надеюсь помогла)))
Из А в Б ведет 2 пути
из Б в В ведет 2+2=4 пути
из А в В ведет 2 пути
4+2=6
Ответ:6 путей
ПО ГОРИЗОНТАЛИ- 5) столбчатая 6) диаграмма 7) круговая 8) точность 9) однотипная
ПО ВЕРТИКАЛЕ- 1) ЛЕПЕСТКОВАЯ 2) ВИЗУАЛИЗАЦИЯ 3) ГРАФИК 4) НАГЛЯДНОСТЬ
Синтез — процесс соединения или объединения ранее разрозненных вещей или понятий в целое или набор.
Var a,b,i,nod:integer
Begin
a:=-1;
b:=-1;
//ввод первого числа
Writeln('Введите первое число');
While a<0 do
begin
readln(a);
if a<0 then writeln('Ввод ошибочен, повторите ввод первого числа');
end;
//ввод второго числа
Writeln('Введите второе число');
While b<0 do
begin
readln(b);
if b<0 then writeln('Ввод ошибочен, повторите ввод второго числа');
end;
//определение минимального числа
if a>b then i:=b else i:=a;
//перебор чисел от минимального до 0 (т.к. НОД не может быть больше минимального числа)
While nod=0 do
begin
i:=i-1;
if (a mod i = 0) and (b mod i = 0) then nod:=i;
end;
//вывод НОД
Writeln('НОД ', a,' и ', b, ' = ', nod);
end.