Предмет: Информатика, автор: 21rusDENIS

ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ В БЕЙСИКЕ
Дано целое число n (1 ≤ n ≤ 99), определяющее возраст человека (в годах). Для этого числа напечатать фразу «мне n лет», учитывая при этом, что при некоторых значениях n слово «лет» надо заменить на слово «год» или «года».

Ответы

Автор ответа: Аноним
0
Написал на VBS, тот же бейсик, который есть в школах

dim years
years = inputbox("Введите ваш возраст")
if years = 1 then msgbox("Мне 1 год") end if
if years = 2 then msgbox("Мне 2 годa") end if
if years = 3 then msgbox("Мне 3 годa") end if
if years = 4 then msgbox("Мне 4 годa") end if
if (years >= 5) and (years <= 19) then msgbox("Мне "+cstr(years)+" лет") end if

if years >= 20 then
dim s
s = "Мне "+cstr(years)
if (years mod 10 = 1) then s = s + " год" end if
if (years mod 10 >= 2) and (years mod 10 <= 4) then s = s + " годa" end if
if (years mod 10 >= 5) and (years mod 10 <= 9) then s = s + " лет" end if
if (years mod 10 = 0) then s = s + " лет" end if
msgbox(s)
end if
Автор ответа: Аноним
0
DIM y, y1
INPUT "Введите возраст ", y
IF y < 21 THEN z = y ELSE z = y MOD 10
SELECT CASE z
CASE 1
  PRINT "мне 1 год"
CASE 2 TO 4
  PRINT "мне"; y; "года"
CASE ELSE
  PRINT "мне"; y; "лет"
END SELECT
END

Похожие вопросы
Предмет: Химия, автор: drapter150
1. Веществом является
А. серебряная монета Б. медный купорос В. капля воды Г. железная скрепка Д. пуговица
2. Физическое явление - это...
А. скисание молока Б. горение бензина В. растворение негашеной извести в воде
Г. образование инея Д. спиртовое брожение Е. электролиз воды
3. Химическое явление - это...
А. Испарение ацетона при комнатной температуре
Б. выцветание краски под действием солнечных лучей
В. вытягивание медной проволоки
Г. Смешивание железных и древесных стружек
Д. таяние льда
Е. выделение тепла электроплиткой
4. Элемент 3-го периода II группы главной подгруппы (IIАгруппы) Периодической системы
химических элементов Д.И.Менделеева
А. Магний Б. Алюминий В. Кальций Г. Бериллий Д. Углерод Е. Фосфор
5. Элемент, названный в честь России
А. Полоний Б. Европий В. Рутений Г. Рений Д. Рубидий Е. Менделеевий
6. Запись 2Н означает:
А. 2 атома водорода Б. одну молекулу водорода В. две молекулы водорода Г. атом водорода
7. Верны ли суждения о правилах работы с лабораторным оборудованием?
А.Мерный цилиндр используют для измерения объёма жидкостей.
Б. Для прекращения горения спиртовки необходимо накрыть фитиль колпачком.
А) Верно только А Б) Верно только Б В) Верны оба суждения Г) Оба суждения неверны
8. Группа только простых веществ приведена в ряду:
А) кислород, воздух, вода, кефир Б) серебро, водород, озон, фосфор
В) кислород, алюминий, азот, вода Г) хлор, золото, бронза, хлороводород
9. Группа, в которой приведены только сложные вещества:
А) крахмал, сахар, этиловый спирт, углекислый газ Б) кислород, глюкоза, аргон, вода
В) железо, алюминий, олово, криптон Г) сера, ацетон, метан, водород
10. Простое вещество - это...
А. мельчайшая химически не делимая частица
Б. мельчайшая частица вещества, сохраняющая его химические свойства
В. вещество, состоящее из атомов одного химического элемента
Г. вещество, состоящее из атомов разных химических элементов
Д. вещество, которое нельзя разложить