3) программа должна число 5, 3 раза умножить на число 2, которое будет каждый раз увеличиваться на 1
// в след раз формулируйте задания корректно, пожалуйста var i, ans:integer; begin ans:=5; for i:= 2 to 4 do ans := ans * i; Writeln(ans); end. Результат: 120