33

Даны числа от 3 до 15 сложить числа, которые не делятся…

splin 29 августа 2022

Даны числа от 3 до 15 сложить числа, которые не делятся на 3. (решение задачи на языке паскаль)

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

66

program test; var i, sum: integer; begin sum: =0; for i: =3 to 15 do begin if i mod 3 <> 0 then sum: =sum+i; end; writeln ('Sum=', sum); readln; end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

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