Ввести с клавиатуры 10 чисел и найти сумму отрицательных чисел.(паскаль)

Question

Информатика: Ввести с клавиатуры 10 чисел и найти сумму отрицательных чисел.(паскаль)

АНДрЕЙ12277777 · Answer

Var i,k,s:integer;beginwriteln ( Введи 10 чисел );for i:=1 to 10 dobeginreadln (k);if k 0 then s:=s+k;end;writeln (s);end....