78

Программист Василий недавно получил банковскую карточку

musiks 03 марта 2023

Программист Василий недавно получил банковскую карточку. Чтобы не забыть пароль, решил построить его по алгоритму, а именно: пароль равен количеству от 1 до 10 000, не делящихся на 13 и 17. Чему равен пароль Васи?

категория: информатика

95

Program Pr1; uses crt; var i,v: integer; Beginclrscr; i: =1; v: =0; while i <= 10000 do begin if (i mod 13<>0) and (i mod 17<>0) then v: =v+1; i: =i+1; end; writeln (v); end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...