(на паскале) Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 6 и оканчивающихся на 8. Программа
получает на вход количество чисел в последовательности, а затем сами
числа.
Количество чисел не превышает 1000. Введённые числа по модулю
не превышают 30 000.
Программа должна вывести одно число: количество чисел, кратных 6
и оканчивающихся на 8. ( ещё хотелось бы объяснение что вообще от меня надо в этом задание, то есть что должно получиться типо как работает программа вообще )
Саня111178
2
15.12.2020 10:49
8
Другие вопросы по теме Информатика
culi42
11.12.2020 23:27
ыооп
11.12.2020 23:23
Sa6ok1
13.06.2019 18:30
edgarotlichnik55
13.06.2019 18:30
эаэаэа
15.04.2020 13:49
kochergaki2000
15.04.2020 16:41
mukola16
15.04.2020 16:41
оргеотепок
24.12.2020 14:41
соня1581
24.12.2020 14:42
20000304
24.12.2020 14:42
Популярные вопросы
- Верны ли определения? А) Многовариантное решение - процесс выработки...
1 - Верны ли определения? А) Функции управления - вид управленческой деятельности,...
1 - Верны ли определения? А) Социально-психологический климат – качественная...
3 - Характеристика, отражающая своеобразие индивидуального состава группы,...
3 - К индивидуально-психологическим особенностям личности в исследовании...
3 - Разновидности одного и того же слова, которые характеризуются тождественной...
1 - Психические _ - психические явления, обеспечивающие первичное отражение...
2 - Подвижность ударения в русском языке проявляется только при формообразовании:...
3 - Стилистически окрашенные слова почти всегда имеют синонимы паронимы...
2 - _ – ведущая область управления на рынке труда, в состав которой входят...
1
var
a, s: integer;
begin
s:= 0;
readln(a);
while a<>0 do begin
if (a mod 3 = 0) and (a mod 10 = 8) then
s := s + a;
readln(a);
end;
writeln(s)
end.