Вpascal abc net: вычислить произведение с цикла до(repeat) - вопрос №36166071 от Радужныйединорог1526 31.05.2023 01:46

Question

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

Радужныйединорог1526 · 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)