• 20 March 2017
    • Українська література
    • Автор: Вашареклама

    Найти сумму всех натуральных чисел не превосходящих число m

    • Ответ оставил: Мненужнпомошь
    Program n1;var sum,m,i: integer;beginreadln(m);for i:=1 to m do sum:=sum+i;write(sum);end.
    • НЕ НАШЛИ ОТВЕТ?
    Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предметы...

Последние опубликованные вопросы