Программы в Кубесике. -Заданы два натуральных. числа. Определить, является ли среднее арифметическое этих чисел целым числом -На ввод номера месяца программа должна печатать, к какому времени года этот месяц относится.

Программы в Кубесике. -Заданы два натуральных. числа. Определить, является ли среднее арифметическое этих чисел целым числом -На ввод номера месяца программа должна печатать, к какому времени года этот месяц относится.
Гость
Ответ(ы) на вопрос:
Гость
Задача 1 CLS INPUT "Введите первое число: ", a INPUT "Введите второе число: ", b c = (a + b) / 2 IF INT(c) = c THEN    PRINT "Среднее является целочисленным" ELSE    PRINT "Среднее не является целочисленным" END IF Тестовое решение: Введите первое число: 18 Введите второе число: 152 Среднее является целочисленным Задача 2 DIM n AS INTEGER CLS INPUT "Введите номер месяца: ", n SELECT CASE n CASE 1, 2, 12: PRINT "Зима" CASE 3 TO 5: PRINT "Весна" CASE 6 TO 8: PRINT "Лето" CASE ELSE: PRINT "Осень" END SELECT Тестовое решение: Введите номер месяца: 7 Лето
Не нашли ответ?
Ответить на вопрос
Похожие вопросы