50

Пожаалуйста,Geany. Найти сумму целых чисел от 100 до 500: сумму от a до 500 a <= 500

21 марта 2023

Пожаалуйста,Geany. Найти сумму целых чисел от 100 до 500: сумму от a до 500 a <= 500

категория: информатика



38

Var sum,i: integer; beginsum: =0; for i: =100 to 500 dosum: =sum+i; writeln (i); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...