Здоровый котенок играет не менее 8 часов в день напишите алгоритм, который определяет, здоров ли котёнок по кличке пушок.

в среде программирования quickbasic используется оконная технология организации диалога, рассчитанная на использование в качестве устройств ввода клавиатуры и специального манипулятора мышь. маркер курсора клавиатуры или мыши позиционируется в одном из окон и нажимается клавиша < enter> или соответствующая кнопка мыши для выполнения выбранного действия связанного с этим окном.

рассмотрим подробнее технологию организации диалога с использованием клавиатуры. для выбора какого либо пункта меню необходимо нажать клавишу < alt> фон слова file изменится и среда ожидает выбора конкретного раздела меню. курсором клавишами стрелки выбрать нужный раздел, после этого необходимо нажать клавишу < enter> . под выбранным пунктом меню появится подменю. курсором клавишами < стрелки > выбрать нужный раздела подменю ,после этого необходимо нажать клавишу < enter> . в случае необходимости отмены исполнения выбранного пункта меню достаточно нажать клавишу < esc> .

                для н=1000 по 9999 цикл

                                                            стр = формат(н, "чрг=; чг=");

                                                            ч1 = лев(стр,1);

                                                            ч2 = сред(стр,2,1);

                                                            ч3 = сред(стр,3,1);

                                                            ч4 = прав(стр,1);

                                                            если не (ч1 = ч2 или ч1 = ч3 или ч1 = ч4 или ч2 = ч3 или ч2 = ч4 или ч3 = ч4) тогда

                                                                                            сообщить(н);

                                                            конецесли;

                              конеццикла;