Регистрация
Maksim24k
15.12.2022 22:47
Информатика
Есть ответ 👍

Найдите суммы положительных и отрицательных чисел из заданных n чисел.определите наибольшее из сумм по абсолютной величине

288
359
Посмотреть ответы 2

Ответы на вопрос:

megadog
megadog
4,6(68 оценок)
Program_z1; var  n,so,sp,i: integer; begin read(n); so: =0; sp: =0; for i: =1 to n do begin if i> 0 then sp: =sp+i else so: =so+i; end; if so> sp then write('so', so) else write('sp',sp); readln; readln; end.
nikita2003201711
nikita2003201711
4,7(91 оценок)

ответ:

a = 3, b = 5, s = 8

Популярно: Информатика