программист Василий Кадров недавно получил банковскую карточку.Чтобы не забыть пароль к карточке, Василий решил построить его по алгоритму, а именно :
10-11 класс
|
пароль равен количеству чисел от 1 до 10000, не делящихся на 13 и 17.Чему равен пароль Васи?
Program Pr1;
uses crt;
const n=10000;
var mas:array[1..n] of integer;
i,l:integer;
Begin
clrscr;
for i:=1 to n do mas[i]:=i;
l:=0;
for i:=1 to n do if (mas[i] mod 13<>0) and (mas[i] mod 17<>0) then l:=l+1;
writeln(l);
end.
Другие вопросы из категории
а) 1100 ? 11 ? 100 = 100000
б) 1100 ? 10 ? 10 = 100
в) 1100 ? 10 ? 10 = 110000
г) 1100 ? 10 ? 10 = 1011
д) 1100 ? 11 ? 100 = 0
вводится с клавиатуры.Используйте оператор CASE.
Читайте также
пароль равен количеству чисел от 1 до 10000, НЕ делящихся на 13 и 17. Чему равен пароль?
1)дан одномерный массив заполнит его так чтобы получилась геометрическая прогрессия где первый член равен 2, d=-3 и вывести в столбец.
2)вывести массив в строку и найти минимальный элемент массива.
3)отсортируйте его по возрастанию и вычислите произведение элементов массива.
Иванов - по странному стечению обстоятельств имеют "совпадающие имена,
причем не один из них не является "тезкой своей фамилии. Кроме того, о
них известно следующее:
a. Все кроме Антонова и Глебова, уже женаты.
b. Невесте Егора очень не нравится фамилия ее жениха
c. Фамилия Глеба совпадает с именем Иванова
d. Жены Дмитриева и Ивана - родные сестры
e. Тот, чье имя совпадает с фамилией Бориса, женат, и его фамилия совпадает с именем Егорова
f. Иван, Егор и Василий – брюнеты
g. Остальные четверо в числе которых, Иванов, Егоров и Васильев – блондины.
Как фамилия Василия?
если можно в виде таблицы решение
фирма С получит максимальную прибыль , если максимальную прибыль получит фирма В или не получит фирма А