пароль построенный по алгоритму пароль равен количеству от 1 до 10000, не делящихся на 13и 17
5-9 класс
|
Program Pr1;
uses crt;
var mas:array[1..10000] of integer;
i,v:integer;
Begin
clrscr;
v:=0;
for i:=1 to 10000 do mas[i]:=i;
for i:=1 to 10000 do if (mas[i] mod 13<>0) and (mas[i] mod 17<>0) then v:=v+1;
writeln(v);
end.
Другие вопросы из категории
Найти номер последнего отрицательного элемента массива
индексами), не включая эти элементы. СРОЧНОООО!!!!!!!!!!!!!!!
Читайте также
пароль равен количеству чисел от 1 до 10000,не делящихся на 13 и 17.Чему равен пароль Васи?
пароль равен количеству чисел от 1 до 10000 не делящихся на 13 и 17 ,чему равен пароль васи?
1 до 10 000, не делящихся на 13 и 17. Чему равен пароль Васи?
пароль равен количеству чисел от 1 до 10 000, не делящихся на 13 и 17. Чему равен пароль Васи?
Помогите, плиз, оооочень нужно!!!:(
3.Определить и вывести на экран количество трехзначных чисел,которые делятся без остатка на 5 и 21 одновременно.
4.спортсмен пробежал в 1-ый день тренеровки расстояние 10 км. В каждый следующий день он робегал на 3 км больше ,чем в предыдущий. Определить Суммарное расстояние.
5. в Пионерском лагере n отрядов с различным количеством детей. Сколько всего детей в пионерском лагере?