1. В школах всегда говорят, что лучший пример алгоритма - какой-нибудь кулинарный рецепт.
Линейный алгоритм приготовления колобка.
Колобок картофельный Картофель (1,2 кг) ; Яйца (2 шт.) ; Мука пшеничная (100 г) ; Сухари (60 г) ; Жир для жарки (200 г) . В протертый отварной картофель добавить 3 столовые ложки муки, желтки двух яиц. Хорошо перемешать, посолить и сформировать шарики. (От себя: для пикантности можно добавить мелко нарезанную копченую колбаску или ветчину) . Полученные шарики запанировать в муке, смочить во взбитых белках и обвалять в сухарях. Жарить в кипящем масле до готовности.
Можно еще по сусекам поскрести ;)
2. Ветвление. Сказку не помню, позор мне. Что-то про Илью Муромца. Вот где он стоял на распутье и выбирал дороги: направо пойдешь коня потеряешь, прямо пойдешь голову потеряешь, налево пойдешь и коня и голову потеряешь
Линейный алгоритм приготовления колобка.
Колобок картофельный
Картофель (1,2 кг) ;
Яйца (2 шт.) ;
Мука пшеничная (100 г) ;
Сухари (60 г) ;
Жир для жарки (200 г) .
В протертый отварной картофель добавить 3 столовые ложки муки, желтки двух яиц. Хорошо перемешать, посолить и сформировать шарики. (От себя: для пикантности можно добавить мелко нарезанную копченую колбаску или ветчину) . Полученные шарики запанировать в муке, смочить во взбитых белках и обвалять в сухарях. Жарить в кипящем масле до готовности.
Можно еще по сусекам поскрести ;)
2. Ветвление. Сказку не помню, позор мне. Что-то про Илью Муромца. Вот где он стоял на распутье и выбирал дороги: направо пойдешь коня потеряешь, прямо пойдешь голову потеряешь, налево
пойдешь и коня и голову потеряешь
1.
program pifagor;
var
a,b:real;
begin
write('Введите катеты 》 ');
read(a,b);
write('Гипотенуза 》 ',sqrt(sqr(a)+sqr(b)));
end.
2.
program temp2;
var
a:integer;
begin
write('Введите число 》 ');
read(a);
write('Последняя цифра числа 》 ',a mod 10)
end.
3.
program pifagor;
var
a:integer;
begin
write('Введите трехзначное число 》 ');
read(a);
write('Сумма цифр числа = ',a div 100+a div 10 mod 10+a mod 10);
end.
4.
A=50
B=20
A=40-30=10
10<20
C=2×10=20
5.
program kratnost;
var
x:integer;
begin
write('Введите X 》 ');
read(x);
if(x mod 5=0)
then
write('X Делится на 5')
else
write('X Не делится на 5')
end.