Найти сумму 10 произвольных чисел вводимых с клавиатуры, (

Question

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

maxim2006c · Answer

var a:array[0..9] of integer;var i,sum:integer;begin  for i:=0 to 9 do begin    write( Vvedite chislo: );    readln(a[i]);     sum:=sum+a[i];  end;  writeln(sum);  readln;end....

Найти сумму 10 произвольных чисел вводимых с клавиатуры, (

Популярные вопросы