помогите пожалуйста сделать программу в фри паскале :сначало надо найти сумму положительныхотрцательных и потом их сложить помогите
var ch,so,sp:integer;
begin
for i:=1 to 4 do
begin
if ch>0 then sp:=s+ch
else
so:=so+ch;
end;
writeln(so+sp);
end.
как то так
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
