В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
BooHazz
BooHazz
25.10.2021 22:15 •  Информатика

1. Інформаційні технології це: а) системи, що застосовуються в системах управління базами
даних
б) технології та засоби, що забезпечують та підтримують
інформаційні процеси.
в) процеси збирання інформації.​

Показать ответ
Ответ:
papuh
papuh
13.04.2020 12:00

s = 121

Объяснение:

s = 0 // s = 0

for k in range(2, 13): // Цикл выполняется 11 раз (2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12)

   s = s + 11 // s = s + 11

print(s) // Выводим s

Итерация 1:

s = 0

s = 0 + 11

s = 11

Итерация 2:

s = 11

s = 11 + 11

s = 22

Итерация 3:

s = 22

s = 22 + 11

s = 33

Итерация 4:

s = 33

s = 33 + 11

s = 44

Итерация 5:

s = 44

s = 44 + 11

s = 55

Итерация 6:

s = 55

s = 55 + 11

s = 66

Итерация 7:

s = 66

s = 66 + 11

s = 77

Итерация 8:

s = 77

s = 77 + 11

s = 88

Итерация 9:

s = 88

s = 88 + 11

s = 99

Итерация 10:

s = 99

s = 99 + 11

s = 110

Итерация 11:

s = 110

s = 110 + 11

s = 121

0,0(0 оценок)
Ответ:
lakatoshnika1
lakatoshnika1
14.04.2021 21:01

var

 Ch, Mes, MaxCh: Integer;

begin

 Write ('Введите число (1-31):');

 ReadLn (Ch);

 if (Ch < 1) or (Ch > 31) then begin

   WriteLn ('Введено некорректное число');

   Exit;

 end;

 Write ('Введите месяц (1-12): ');

 ReadLn (Mes);

 if (Mes < 1) or (Mes > 12) then begin

   WriteLn ('Введен некорректный месяц');

   Exit;

 end;

 case Mes of

 1, 3, 5, 7, 8, 10, 12: MaxCh := 31;

 4, 6, 9, 11: MaxCh := 30;

 2: MaxCh := 28;

 end;

 if Ch <= MaxCh then

   WriteLn ('Дата правильная')

 else

   WriteLn ('Дата неправильная!');

end.

// в программе не учитывается то, что в високосном году февраль имеет 29 дней

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