1. Информатика
  2. 10 класс, паскаль с экрана

10 класс, паскаль с экрана запрашивается номер месяца. в зависимости от введенного значения на экран выводится либо сообщение о том, какому времени года этот месяц принадлежит, либо о том, что месяца с таким номером не существует. каждое время года выводится своим цветом: зима - белым, весна - зеленым, лето - красным, осень - желтым. сообщение о том, что месяца с таким номером не существует, - серым.

kosmos132 kosmos132    1   15.06.2019 13:50    0

Ответы
КристиGirl КристиGirl  02.10.2020 02:10
Program PORA;  
Var MONTH:integer;
begin
writе('Введіть порядковий номер місяця:');
readln(MONTH); if (M0NTH<1) or (month>12) then
writeln('Такого місяця немає') else
case MONTH of
3,4,5:writeln('Becнa');
6,7,8:writeln('Лiтo');
9,10,11l:writeln(Ociнь');
12,1,2:writeln('3имa')
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
yfyfhvfyf yfyfhvfyf  15.05.2019 20:03
Составить блок схему к квадратной матрицы! ....
mashkavoronina mashkavoronina  15.05.2019 20:04
Сфункцией если в ! у вани есть три предмета за которые он получил за четверть 3 оценки! нужно узнать перешел ли ваня в другой класс, он перейдет в другой класс если в четверти...
Dan1L1an Dan1L1an  15.05.2019 20:06
1.системы счисления. позиционные и непозиционные сс. правило перевода целых десятичных чисел в сс с основанием q. 2.программирование разветвляющихся алгоритмов. билет 2 1.системы...
BlazeBTM BlazeBTM  25.05.2020 11:23
План города представляет собой прямоугольник размером n×m×километров, разбитых на кварталы — квадраты со стороной 1 километр. Между кварталами, а также по границе города проложены...
egopka666 egopka666  25.05.2020 10:47
Які називають публікацію що є періодичним багатосторінковим виданням сторінки якого скріплені між собою...
Андрей99951 Андрей99951  25.05.2020 10:48
Написати програму, що дозволяє ввести Х – кількість хвилин та визначити, скільки в Х хвилинах секунд....
Mery0323 Mery0323  25.05.2020 10:51
Используя ведро емкостью 9 литров и ведро емкостью 4 литра, наберите из пруда 6 литров воды....
барц2005 барц2005  25.05.2020 10:50
Як записати квадрат числа х мовою програмування Паскаль? sfr(x) sprt(x) sqr(x) 6. Як записати корінь квадратний числа х мовою програмування Паскаль? sqr(x) sprt(x) sjr(x)...
permyashkinanap0a88m permyashkinanap0a88m  25.05.2020 11:25
Як у середовищі текстового процесора форматувати векторні зображення?​...
kolitka1 kolitka1  25.05.2020 18:25
на паскале В григорианском календаре года нумерются числами 1, 2, 3 и т.д., - это года “нашей эры”. Предшествующие года называются “первый год до нашей эры”, “второй год до нашей...

Популярные вопросы