Find the sum of all single-digit numbers. Write a program in pascal
August 6, 2021 | education
| program sum;
var
i, summa: integer;
begin
summa: = 0;
for i: = 1 to 9 do summa: = summa + i; // counter in the range from 1 to 9, since there are only 9 single-digit numbers (do not include the number 0, since it is not a natural number).
writeln (‘The sum of all single-digit numbers is equal to’, summa, ‘.’);
end.
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.