Вопрос по информатике:
среди натуральных чисел, меньших некоторого n, вычислить сумму чисел, которые делятся на 3 и не делятся на 5. написаты програму на языке Паскаль.
- 03.04.2018 03:19
- Информатика
- remove_red_eye 12331
- thumb_up 82
Ответы и объяснения 1
uses crt;
var
a:array[1..1000] of integer;
i,n,sum:integer;
begin
write('Введите число: ');
read(n);
for i:=1 to n-1 do
if (i mod 3=0) and (i mod 50) then sum:=sum+i;
write(sum);
end.
- 04.04.2018 09:32
- thumb_up 14
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.