Оператор case of, циклы в языке паскаль. написать программы: 1. выводящую по числу день недели. например, 1-понедельник

Var i:integer;
begin
writeln('введите число от 1 до 7');
readln(i);
case i of 
1:writeln('Понедельник');
2:writeln('Вторник');
3:writeln('Среда');
4:writeln('Четверг');
5:writeln('Пятница');
6:writeln('Суббота');
7:writeln('Воскресенье');
end;
readln;
end.

1. У задачах, які передбачають виконання альтернативних дій, використовують оператор повного розгалуження. Для запису оператора повного розгалуження додатково використовують службове слово

else:

if <логічний вираз>:

блок команд 1

else:

блок команд 2

2. Наведіть приклади, коли у програмі варто застосовувати оператор неповного розгалуження.

Складіть програму мовою Python, у якій із двох введених цілих чисел А і В (<100) виводиться найбільше з них.

3. Як мовою програмування Python реалізувати вкладені розгалуження?

Якщо є потреба врахувати значення декількох логічних виразів, то використовують вкладені розгалуження:

if <логічний вираз1>:

блок команд 1

elif <логічний вираз2>:

блок команд 2

...

elif <логічний вираз n>:

блок команд n

else:

<блок команд інакше>

Код на C++ (компилятор msvc, но на g++ тоже будет работать, если надо)

#include <iostream>

using namespace std;

int main()

{

   int left, right;

   cin >> left >> right;

   if (left > right)

   {

       swap(left, right);

   };

   for (int i = left; i <= right; i++)

   {

       cout << i * i << " ";

   };

   cout << endl;

   return 0;

}

Объяснение:

Тут выводятся квадраты чисел в диапазоне [left;right]. И если так получилось, что left больше right, то мы меняем значения местами