44

PascalНайти сумму всех двухзначных чисел, которые кратны трем.

06 марта 2023

PascalНайти сумму всех двухзначных чисел, которые кратны трем.

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



83

Uses crt; var ,c,k: integer; begin c: =0; for k: =10 to 99 doif (k mod 3=0) then c: =c+k; write (c); end.

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


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