Найти сумму n однозначных чисел введенных с клавиатуры - вопрос №5614260 от germanlandyshev 07.08.2021 03:10

Question

Информатика: Найти сумму n однозначных чисел введенных с клавиатуры паскаль

germanlandyshev · Answer

Program bog(input, output); type vector=array[1..100] of integer; var n, s, i:integer; z:vector; begin read (n); for I:=1 to n do read (z[i]); s:=0; for I:=1 to n do s:=s+z[i]; writeln (s); end....