Среди натуральных чисел, меньших некоторого n, вычислить сумму чисел, которые делятся на 3 и не делятся на 5. написаты програму на языке паскаль.
aigulzhan
1
30.03.2019 07:40
1
Другие вопросы по теме Информатика
Юлька9062804
25.07.2019 14:40
krasnov595egr
25.07.2019 14:40
aushatsy
25.07.2019 14:40
denisprokopev
25.07.2019 14:50
Anastasia1tsv
25.07.2019 14:50
amir139
25.07.2019 15:00
tanyasidorcova
25.07.2019 15:00
hekita14
25.07.2019 15:00
Популярные вопросы
- Домашнее задание 1. Расскажите о финансовой ситуации в России в середине XVII в....
1 - заранее ОГРОМНОЕ Тест1. Имя прилагательное – часть речи, которая обозначает:а)...
2 - Объясните, почему кочевание осу-ществлялось в меридиональномнаправлении, с юга...
1 - Составь уравнения и реши их, если: А) значения выражений (р – 20) и (4р + 4) равны;...
2 - 1. Каково важнейшее свойство насыщенных паров? 2. От чего и как зависит относительная...
2 - Будь ласка до ть! Треба написати 4 речення....
3 - Характеристикою досягнень музичногой і тентрального мистемаспробуйте визначити...
2 - №3. Измерения параллелепипеда равны 3 см, 6 см и 8 см. Найдите площадь наибольшей...
3 - Геометрия, 7 класс 2 теста...
2 - 3Позначте ім я персонажа твору Р. Бредбері 451°за Фаренгейтом , який промовляє...
2
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 5<>0) then sum:=sum+i;
write(sum);
end.