Циклы» написать программу: 15 напишите программу, которая в последовательности целых чисел определяет количество положительных чисел, кратных двенадцати . программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом ноль (ноль – признак окончания ввода, не входит в последовательность). количество чисел не превышает 1000. введенные числа по модулю не превышают 30000.
Pomogite20000p
3
21.05.2019 18:10
0
Другие вопросы по теме Информатика
Іруна
09.06.2020 06:17
vadimmka666
10.12.2020 14:37
tagirok4525
13.06.2019 10:30
dominikablak
13.06.2019 10:30
niminol
13.06.2019 10:30
Masha6655
13.06.2019 10:30
Ochinchin
13.06.2019 10:30
ладаседан6
13.06.2019 10:30
Адриана111111111
30.04.2020 18:40
Популярные вопросы
- 1)существует ли абсолютная свобода? 2)свобода пораждает ответственность....
3 - Подчеркни лишнее по смысу: кожа глаза уши язык нос...
2 - Расстояние между благовещенск и пермь . москва и пекин . санкт...
3 - Выразите рост в аршинах(мой рост 148). и как выразить свой рост...
1 - Происходит ли эволюция в настоящее время?...
2 - На тему логики не могу решить - нужно разместить 9 стульев в...
1 - Между мотоциклистами 700 км. первый мотоциклист едет со скоростью...
1 - 1. кто и где создавал рукописные книги? 2. как оформлялись рукописные...
2 - Как изменится сила взаимодействия между двумя точечными ежели...
3 - Что такое - положение- что такое этнокультурной положение- микроположение...
3
а на каком языке программирования?
на JavaScript:
var i = 1; kratnoe = 0;
while ( i < 1000) {
i += 1;
if ( i % 12 == 0) {
kratnoe += 1;
}
}
alert (kratnoe);
uses crt;
var i,s:integer;
begin
s:=0;
repeat
write('Vvedite chislo: ');
readln(i);
if ((i>0) and (i mod 12 = 0)) then inc(s);
until ((i=0 ) and (i< 1001) and (abs(i)<=30000));
writeln('count ',s);
readln;
end.