Составить программу для нахождения суммы последовательности чисел…

Question

Составить программу для нахождения суммы последовательности чисел произвольногодиапазона (паскаль)

Answer 1

63

c0der

15 августа 2022

program NT; var i, s, n: integer; beginwriteln ('vvedi n'); readln (n); s: =0; for i: =1 to n do begin x: =-10+random (200); s: =s+x; end; writeln ('s=',s); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: