Как в паскале записать сумму чисел от 1 до n
Как в паскале записать сумму чисел от 1 до n
Гость
Ответ(ы) на вопрос:
Гость Возможны ошибки.
Program prim;
Var x, s: integer;
Begin
s:=0
For x:= 1 to n do s:=s+x
Writeln ('Сумма равна' , s)
End.
Не нашли ответ?
Похожие вопросы