Вpascal abc net: вычислить произведение с цикла до(repeat) - вопрос №166573369 от Aliskaliska27 23.01.2020 16:30

Question

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

Aliskaliska27 · 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)