Calculate the product of positive and negative numbers between -7 and 7 by Pascal ABC.
| January 8, 2021 | education
Program chisla;
const
n = 7;
var
prm, prp, i: integer;
begin
prm: = 1;
prp: = 1;
for i = -n to n do
begin
if i <0 then prm: = prm * i
if i> 0 then prp: = prp * i
end;
writeln (‘the product of positive numbers =’, prp, ‘, the product of negative terms =’, prm);
end.
By changing the const value of n in the string, you can change the interval.
One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.
