Информатика, вопрос задал darvi001 , 7 лет назад

Составьте программу по предложенной блок-схеме.

Приложения:

Ответы на вопрос

Ответил raf1O5
0

program raf105;

var n,S,i: integer;

begin

readln(n);

S:= 1;

for i:=1 to n do

begin

 S:= S+5*i;

 writeln(s);

end;

end.

Новые вопросы