Разработайте программу, которая задаёт пользователю три во о том, какие числа ему нравятся (например "Вам нравятся числа, кратные 3?", "Вам нравятся двузначные числа?", "Вам нравятся числа, оканчивающиеся цифрой 4?" и т.п., во придумаете сами). Получив от пользователя три ответа можно сделать так, чтобы это были не ДА и НЕТ, а True или False), программа пользователя ввести число и выводит, нравится оно пользователю или нет. Будем считать, что число нравится пользователю в том случае, если оно обладает всеми "нравящимися" свойствами и не обладает ни одним "не нравящимся".

Постарайтесь свести решение о том, нравится ли число пользователю, к одному логическому выражению, содержащему логические переменные, операции сравнения и логические операции.

Написать на Visual Basic

1.

использовать Чертежник

алг

нач

опустить перо

нц 6 раз

сместиться на вектор (0,1)

сместиться на вектор (6,0)

сместиться на вектор (0,-1)

сместиться на вектор (-6,0)

сместиться на вектор (0,1)

кц

поднять перо

сместиться в точку (-1,-1)

кон

2.

использовать Чертежник

алг

нач

опустить перо

нц 6 раз

сместиться на вектор (0,6)

сместиться на вектор (1,0)

сместиться на вектор (0,-6)

сместиться на вектор (-1,0)

сместиться на вектор (1,0)

кц

поднять перо

сместиться в точку (-1,-1)

кон

3.

использовать Чертежник

алг

нач

опустить перо

нц 6 раз

сместиться на вектор (0,1)

сместиться на вектор (6,0)

сместиться на вектор (0,-1)

сместиться на вектор (-6,0)

сместиться на вектор (0,1)

кц

поднять перо

сместиться в точку (0,0)

опустить перо

нц 6 раз

сместиться на вектор (0,6)

сместиться на вектор (1,0)

сместиться на вектор (0,-6)

сместиться на вектор (-1,0)

сместиться на вектор (1,0)

кц

поднять перо

сместиться в точку (-1,-1)

кон

Объяснение:

Смотри картинки

1.

использовать Чертежник

алг

нач

опустить перо

нц 6 раз

сместиться на вектор (0,1)

сместиться на вектор (6,0)

сместиться на вектор (0,-1)

сместиться на вектор (-6,0)

сместиться на вектор (0,1)

кц

поднять перо

сместиться в точку (-1,-1)

кон

2.

использовать Чертежник

алг

нач

опустить перо

нц 6 раз

сместиться на вектор (0,6)

сместиться на вектор (1,0)

сместиться на вектор (0,-6)

сместиться на вектор (-1,0)

сместиться на вектор (1,0)

кц

поднять перо

сместиться в точку (-1,-1)

кон

3.

использовать Чертежник

алг

нач

опустить перо

нц 6 раз

сместиться на вектор (0,1)

сместиться на вектор (6,0)

сместиться на вектор (0,-1)

сместиться на вектор (-6,0)

сместиться на вектор (0,1)

кц

поднять перо

сместиться в точку (0,0)

опустить перо

нц 6 раз

сместиться на вектор (0,6)

сместиться на вектор (1,0)

сместиться на вектор (0,-6)

сместиться на вектор (-1,0)

сместиться на вектор (1,0)

кц

поднять перо

сместиться в точку (-1,-1)

кон

Объяснение:

Смотри картинки