Пользователь вводит с клавиатуры номер месяца (1-12). Необходимо вывести на экран название месяца.
Например, если 1, то на экране надпись январь, 2 — февраль и т.д.
Когда пользователь вводит 0, программа должна завершить работу
P.S. я все сделал единственное какую то строку пропустил изза чего образуется вечный цикл. использовать надо while.
Ответы на вопрос:
months = [
"январь",
"февраль",
"март",
"апрель",
"май",
"июнь",
"июль",
"август",
"сентябрь",
"октябрь",
"ноябрь",
"декабрь"
]
x = 1
while x != 0:
x = int(input())
if x in range(1, 13):
print(months[x-1])
else:
print("Неверный ввод")
Объяснение:
months - список строк месяцев. Изначальное значение переменной любое, кроме 0, к примеру, 1. Цикл начинается при условии неравенства переменной нулю. Мы циклически запрашиваем новое значение до тех пор, пока не будет введено число 0.
1)
var a, b, c, d, f : integer; s : real; begin
writeln( 'введите стороны треугольника: ' ); write( 'a = ' ); readlln( a ); write( 'b = ' ); readlln( b ); write( 'c = ' ); readlln( c );
writeln( 'введите стороны прямоугольника: ' ); write( 'd = ' ); readlln( d ); write( 'f = ' ); readlln( f ); s : = (a + b + c) / 2; s : = sqr( s * (s-a) * (s-b) * (s-c) ); if (d * f) = s then writeln( 's прямоугольника = s треугольника.' ) else if (d * f) > s then writeln( 's прямоугольника больше.' ) else writeln( 's треугольника больше.' ); readln; end.
2)
var m, v, m1, v1 : integer; begin
writeln( 'введите объем и массу первого тела: ' ); write( 'm = ' ); readlln( m ); write( 'v = ' ); readlln( v );
writeln( 'введите объем и массу второго тела: ' ); write( 'm = ' ); readlln( m1 ); write( 'v = ' ); readlln( v1 ); if (m / v) = (m1 / v1) then writeln( 'плотности равны.' ) else if (m / v) > (m / v) then writeln( 'плотность первого тела больше.' ) else writeln( 'плотность второго тела больше.' ); readln; end.
3)
var a, b : integer; begin
writeln( 'введите числа: ' ); write( 'a = ' ); readlln( a ); write( 'b = ' ); readlln( b );
if a mod b = 0 then write( 'число a является делителем числа b.' ); if b mod a = 0 then write( 'число b является делителем числа a.' ); readln; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
sssqwdsgdsgds07.06.2022 02:12
-
KateBytorova26.10.2020 22:09
-
romashka30119.08.2022 10:25
-
Даниил35822.09.2021 07:55
-
Pussyellien17.11.2022 02:58
-
pforsov3031.05.2022 00:27
-
wwwghg15.04.2023 08:06
-
чек1428.05.2020 09:17
-
nikaknekto26.05.2022 20:57
-
danekhakker27.01.2023 02:07
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.