Найдите сумму произвольных десяти чисел - Pascal ABC
Формулировка задачи:
Вычислите на компьютере значения переменных
задание:
Найдите сумму произвольных десяти чисел
в pascalabc
Решение задачи: «Найдите сумму произвольных десяти чисел»
textual
Листинг программы
var i,x,s:integer; begin randomize; for i:=1 to 10 do begin read(x); s:=s+x; end; write(s); end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д