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

program pr1; uses crt; const n=10000; var mas: array[1..n] of integer; i,l: integer; beginclrscr; 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.

#include < iostream> int main(){    int n;     std: : cin > > n;     int a = 1;     int b = 1;     for(int i = 0; i < n; i++)    {        std: : cout < < (i % 2 == 0 ? a : b) < < std: : endl;         if(i % 2 == 0)            a += b;         else              b += a;     }     return 0; }

Visual studio 2017 c++#include "stdafx.h"#include < iostream> #include < fstream> using namespace std; int main(){ ifstream read_file("input.txt"); ofstream write_file("output.txt"); int x, y; read_file > > x > > y; if (x == 1 & & y == 1) { write_file < < "0" < < endl; return 0; } if (x == 1 || y == 1) { write_file < < "1" < < endl; return 0; } if (x! =y) { write_file < < "1" < < endl; return 0; } if (x == y) { write_file < < "2" < < endl; return 0; } return 0; }