73

Найти сумму целых двузначных чисел кратных трем

26 марта 2023

Найти сумму целых двузначных чисел кратных трем

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



73

Program dz2; Var i: byte; s: integer; BeginS: =0; For i: =10 to 99 do If i mod 3=0 then S: =s+i; Writeln ('Сумма двухзначных чисел кратных 3=',s); End.//Подходит?

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


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