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

Davidggg Davidggg    1   10.03.2019 01:10    63

Ответы
vlasyukksterin vlasyukksterin  24.05.2020 13:13

var s,i,f:integer;

Begin

  read(f);

  s:=1;

  repeat

    i:=i+3;

    s:=s*(i+f);

  until i>=27;

  writeln(s);

End.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика