натали19852
24.11.2022 07:08

Подскажите, как правильно решить. Я когда ввожу данные в програму Паскаль, мне высвечивается, что в 17 строке ошибка и я не могу дальше понять, что делать. Ввести номер месяца и вывести количество дней в этом месяце.
Решение: Число дней по месяцам:
28 дней – 2 (февраль)
30 дней – 4 (апрель), 6 (июнь), 9 (сентябрь), 11 (ноябрь)
31 день – 1 (январь), 3 (март), 5 (май), 7 (июль),
8 (август), 10 (октябрь), 12 (декабрь)
Особенность: Выбор не из двух, а из нескольких вариантов в зависимости от
номера месяца.
program qq;
var M, D: integer;
begin
writeln('Введите номер месяца:');
read ( M );
case M of
2: begin D := 28; end;
4,6,9,11: begin D := 30; end;
1,3,5,7,8,10,12: D := 31;
else D := -1;
end;
if D > 0 then
writeln('В этом месяце',D, ' дней.')
else
writeln('Неверный номер месяца');
end.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
божена2006
26.03.2022 16:33

1 Добавление эффекта анимации

   Выделите на слайде объект или текст, к которому нужно добавить анимацию. ...

   На вкладке Анимации откройте коллекцию эффектов анимации и выберите нужный вариант.

   На вкладке Анимации откройте список Параметры эффектов и выберите нужный вариант.

2   Существует четыре типа анимации: Вход, Выход, Выделение и Пути перемещения. Каждая из этих категорий используется для разных целей. При наведении указателем на любую из звездочек, можно сразу увидеть результат применения того или иного эффекта анимации.

3  

Щелкните объект, к которому нужно применить анимацию.

На вкладке Анимация нажмите кнопку Добавить анимацию.

"Добавить анимацию"

Прокрутите коллекцию вниз до пункта Пути перемещения и выберите подходящий вариант.

Прокрутите вниз до раздела путей перемещения

Совет.   При выборе параметра Пользовательский путь вы сможете нарисовать путь, по которому будут перемещаться объекты.

Рисование пользовательского пути

Чтобы завершить рисование пользовательского пути, нажмите клавишу ESC.

Объяснение:

0,0(0 оценок)
Ответ:
Зачемжежить
12.08.2022 19:52

Первая задача.

#include <iostream>

using namespace std;

int main()

{

   setlocale(LC_ALL, "rus");

   

   int Q;

   cin >> Q;

   if (Q >= 100 && Q <= 999)

   {

       cout << "это 3-хзначное число";

   }

   else

   {

       cout << "это не 3-хзначное число";

   }

   cout << endl;

   return 0;

};

Вторая задача.

#include <iostream>

using namespace std;

int main()

{

   setlocale(LC_ALL, "rus");

   

   int D;

   cin >> D;

   if (D >= 10 && D <= 20)

   {

       cout << "Принадлежит";

   }

   else

   {

       cout << "Не принадлежит";

   }

   

   cout << endl;

   return 0;

};

Объяснение:

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота