Предмет: Информатика,
автор: Таша0Эн
Программы в Кубесике. -Заданы два натуральных. числа. Определить, является ли среднее арифметическое этих чисел целым числом
-На ввод номера месяца программа должна печатать, к какому времени года этот месяц относится.
Ответы
Автор ответа:
0
Задача 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
Лето
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
Лето
Похожие вопросы
Предмет: Қазақ тiлi,
автор: Pasha2006007
Предмет: Қазақ тiлi,
автор: T06031986
Предмет: Окружающий мир,
автор: Ал2472
Предмет: Русский язык,
автор: masha120208
Предмет: Қазақ тiлi,
автор: artemka1554