Вpascal abc net: вычислить произведение с цикла до(repeat) - вопрос №36927165896 от Fat9l 19.02.2021 06:32

Question

Информатика: Вpascal abc net: вычислить произведение с цикла до(repeat) (3+f)*(6+f)*(9+f)**(27+f)

Fat9l · Answer

var s,i,f:integer; Begin   read(f);   s:=1;   repeat     i:=i+3;     s:=s*(i+f);   until i =27;   writeln(s); End....

Вpascal abc net: вычислить произведение с цикла "до(repeat)" (3+f)*(6+f)*(9+f)**(27+f)