составте программу по опредилению времени года

Составте программку по опредилению медли года

Задать свой вопрос
1 ответ
Паскаль АВС . Используется оператор case:

program njk;vara:integer;beginwriteln('    Данная программка определяет время года и сам месяц по его номеру');writeln('   В году 12 месяцев!');writeln('  Введите месяца');readln(a);Case a of1:writeln(' Январь- зима');2:writeln(' Февраль-зима');3:writeln(' Март-весна');4:writeln(' Апрель-весна');5:writeln(' Май-весна');6:writeln(' Июнь-лето');7:writeln(' Июль-лето');8:writeln(' Август-лето');9:writeln(' Сентябрь-осень');10:writeln(' Октябрь- осень');11:writeln(' Ноябрь-осень');12:writeln(' Декабрь-зима');end;end.
Vladislav Shablakov
я не понела , нам эту программку надобно записать в тетрадь, так и птсать как у вас?
Леговцев Сергей
program vremena_goda;vara:integer;beginwriteln('    Данная программка определяет время года и сам месяц по его номеру');writeln('   В году 12 месяцев!');writeln('  Введите месяца');readln(a);Case a of1:writeln(' Январь- зима');2:writeln(' Февраль-зима');
Андрей Колобченков
3:writeln(' Март-весна');4:writeln(' Апрель-весна');5:writeln(' Май-весна');6:writeln(' Июнь-лето');7:writeln(' Июль-лето');8:writeln(' Август-лето');9:writeln(' Сентябрь-осень');10:writeln(' Октябрь- осень');11:writeln(' Ноябрь-осень');12:writeln(' Декабрь-зима');end;end. Соблюдая все знаки Подробнее - на Znanija.com - https://znanija.com/task/28714450readmore
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт