Текстовый алгоритм
Есть снег для лепки снеговика?
Нет - выполнение невозможно.
Есть, то:
слепить три разновеликих шара;
установить шары друг на друга в порядке убывания;
сверху установить ведро дном вверх;
в центр верхнего шара установить морковь, над ней два уголька-глаза;
по бокам среднего шара вставить веточки-ручки.
Фигуры блок-схемы
Последовательность фигур может меняться в зависимости от требуемых условий и действий:
овал - обозначает начало блок-схемы и содержит само слово "начало" - ограничивающий символ;
параллелограмм - символ ввода-вывода данных;
прямоугольник обозначает действие - символ выполнения операции;
ромб - фигура, содержащая условие, после которой происходит ветвление алгоритма - символ принятия решения;
круг используется при разрыве записи блок-схемы;
прямоугольник с удвоенными боковыми сторонами обозначает применение подпрограммы - символ повторяемости процесса;
заканчивается запись блок-схемы всегда овалом, который содержит слово "конец".
Порядок выполнения действий указывается линиями.
Блок-схема создания снеговика
Алгоритм создан при идеальных условиях:
если снег есть, то возможно скатать шары для снеговика;
в наличии есть ведро-шапка, морковь-нос, угольки и подходящие веточки;
никто не разрушает созданные фигуры.
Program Valerya;
uses CRT;
car a, b, c, d:integer;
begin
a := 3;
b := 2;
c := 5;
d := 7;
if a – b < 0
then if d < c
then if d < 0
then a := b
else
else a := d
else d := c;
writeln(d);
end.
это программа.
а значение d=5
<em>VAR </em>
<em> k: LongInt;</em>
<em>BEGIN </em>
<em> k := 50; </em>
<em> While (k < 1000) do begin </em>
<em> k := k + 50; Write(k, ' ');</em>
<em> End;</em>
<em>END.</em>
<em>VAR </em>
<em> sum, k: LongInt;</em>
<em>BEGIN </em>
<em> k := 101; sum := 0; </em>
<em> While (k < 150) do begin </em>
<em> sum := sum + k; </em>
<em> k := k + 2; </em>
<em> End; </em>
<em> Writeln(sum);</em>
<span><em>END.</em></span>
Input A,B
if a>b then print a-b else print a+b
end
4 строки (если считать верхнюю), 3 столбца