Скорее всего, условие задачи сформулировано некорректно, ибо составить программу, содержащую не более пяти команд не получится, и сейчас объясню почему.
Так как нужно из числа 4 получить число 80, то первая команда не может являться "2", в противном случае мы уйдем в отрицательные числа. Тогда первая команда - "1", и теперь нам нужно из числа 20 получить число 80. Рассмотрим несколько случаев, когда последней командой мы получаем число 80.
1 случай.
Если последняя команда - "1", то это возможно, когда предпоследний результат будет равен 16, однако так как наша траектория точно содержит число 20, которое кратно 5, то, применяя далее наши команды, мы всегда будем получать число, кратное 5, а нам нужно получить 16. Противоречие.
2 случай.
Теперь рассмотрим ситуацию, когда последняя команда - "2". То есть предпоследний результат равен 85. Если получать число 85 командой "1", то траектория должна содержать число 17. Из соображений кратности (см. 1 случай) это невозможно. Значит вторая с конца команда должна являться "2". Аналогично рассуждая, приходим к выводу о том, что и третья, и четвертая команды с конца тоже должны быть "2". То есть наша траектория имеет вид 1*2222, причем на месте "*" должна быть такая траектория команд, которая позволит получить из числа 20 число 100. Ясно, что наименьшая траектория будет 112222, но она содержит 6 команд. Противоречие.
Получается, что из числа 4 получить число 80 программой, которая бы содержала не более 5 команд, действительно не получится. Но если говорить о наименьшей траектории, то 112222 - будет являться ответом на эту задачу.
Пусть х - это фрешка-гамбургер (xDDDDDDD), y - фрешка без крышки, z - фрешка вместе с крышкой.
x+2y+3z=40
}
2x+4y+9z=104
2x+4y+6z=80
(2x+4y+9z)-(2x+4y+6z)=104-80
3z=24
z=8
x+6y+3z-(x+2y+3z)=58-40
4y=18
y=4,5
x+2×4,5+3×8=40
x=40-24-9
x=7
ШУМ-ГАМ
ЖАРА-ТЕПЛО
БЕДА-ГОРЕ
МОРОЗ-ХОЛОД
ПУРГА-МЕТЕЛЬ
ГРУСТЬ-ТОСКА
ПРОЧНЫЙ-КРЕПКИЙ
ПРОСИТЬ-МОЛИТЬ
СМЕЯТЬСЯ-ХОХОТАТЬ
НЕБОЛЬШОЙ-МАЛЕНЬКИЙ
БАЛОВАТЬСЯ-ШАЛИТЬ
ДОДУМАТЬ-ДОДЕЛАТЬ
Delete(краткая del),,,,,,
program prTreug;
var a,b,y, P: real;
begin
writeln ('введите катеты прямоугольного треугольника');
read (a,b);
if (a<=0) or (b<=0) then
writeln ('такого треугольника нет')
else
begin
y:=sqrt(sqr(a)+sqr(b));
P:= a+b+y;
writeln ('гипотенуза = ',y:6:2);
writeln ('периметр = ',P:6:2);
end;
end.