Введите, что появится на экране (позавершению программы), если значение N=15

Var N, i, S: integer;

Begin

Write ('N=') ; readln (N) ;

S:=0;

For i:=1 to N do

S:=S+i;

Writeln ('S=', S) ;

End.

Question

Информатика

Радосвета

9 декабря, 15:07

Введите, что появится на экране (позавершению программы), если значение N=15

Var N, i, S: integer;

Begin

Write ('N=') ; readln (N) ;

S:=0;

For i:=1 to N do

S:=S+i;

Writeln ('S=', S) ;

End.

+3

Ответы (1)

Знаете ответ на вопрос?

Малх · Answer 1

N=15

S=0

для i от 1 до 15 выполнить S=S+i

i=1 S=1

i=2 S=3

i=3 S=6

i=4 S=10

i=5 S=15

i=6 S=21

i=7 S=28

i=8 S=36

i=9 S=45

i=10 S=55

i=11 S=66

i=12 S=78

i=13 S=91

i=14 S=105

i=15 S=120

Ответ: S=120

Введите, что появится на экране (позавершению программы), если значение N=15Var N, i, S: integer;BeginWrite ('N=') ; readln (N) ;S:=0;For i:=1 to N doS:=S+i;Writeln ('S=', S) ;End.

Введите, что появится на экране (позавершению программы), если значение N=15

Var N, i, S: integer;

Begin

Write ('N=') ; readln (N) ;

S:=0;

For i:=1 to N do

S:=S+i;

Writeln ('S=', S) ;

End.