Запрограмуйте введення значення змінної s.
2) Створіть змінну s1 для формування результату і запишіть у неї
порожній рядок.
3) Число символів у рядку s має бути парним, тому запишіть
оператор розгалуження для реалізації такої дії: якщо довжина
рядка s є непарним числом, то додати до рядка пропуск:
if(len(s)%2 != 0): s = s+' '
4) Запишіть оператор циклу для перебору непарних індексів.
В тілі циклу до рядка s1 додаються символи s[i+1] і s[i]:
for i in range(0, len(s), 2):
s1 = s1+s[i+1]+s[i]
5) Виведіть зашифроване повідомлення.
6) Збережіть програмний код у файлі з іменем Vprava5.
Випробуйте програму.
Переконайтесь, що повідомлення успішно розшифровується за
до цієї ж програми Запрограмуйте введення значення змінної s.
2) Створіть змінну s1 для формування результату і запишіть у неї
порожній рядок.
3) Число символів у рядку s має бути парним, тому запишіть
оператор розгалуження для реалізації такої дії: якщо довжина
рядка s є непарним числом, то додати до рядка пропуск:
if(len(s)%2 != 0): s = s+' '
4) Запишіть оператор циклу для перебору непарних індексів.
В тілі циклу до рядка s1 додаються символи s[i+1] і s[i]:
for i in range(0, len(s), 2):
s1 = s1+s[i+1]+s[i]
5) Виведіть зашифроване повідомлення.
6) Збережіть програмний код у файлі з іменем Vprava5.
Випробуйте програму.
Переконайтесь, що повідомлення успішно розшифровується за
до цієї ж програми І
Если номера месяцев не превысят 12, то есть имеются ввиду только месяцы одного года, то вот так:
Var
N:integer;
Begin
WriteLn('Введите номер месяца');
ReadLn(N);
if (N = 12)or(N = 1)or(N = 2) then WriteLn('Зима') //если N = 12, 1 или 2, то выводим 'Зима', иначе идём по следующей ветке if, проверяем следующее условие
else if (N = 3)or(N = 4)or(N = 5) then WriteLn('Весна') // тут точно также N = 3, 4 или 5, если нет - то проверяем следующее условие
else if (N = 6)or(N = 7)or(N = 8) then WriteLn('Лето')
else if (N = 9)or(N = 10)or(N = 11) then WriteLn('Осень')
End.
Если же номер месяца может превысить 12, то перед проверкой нужно найти остаток от деления этого числа на количество месяцев, то есть на 12. При этом остаток от деления 12 на 12 = 0.
Var
N:integer;
Begin
WriteLn('Введите номер месяца');
ReadLn(N);
N:= N mod 12;
if (N = 0)or(N = 1)or(N = 2) then WriteLn('Зима')
else if (N = 3)or(N = 4)or(N = 5) then WriteLn('Весна')
else if (N = 6)or(N = 7)or(N = 8) then WriteLn('Лето')
else if (N = 9)or(N = 10)or(N = 11) then WriteLn('Осень')
End.
Эти же самые условия можно записать иначе:
if (N>=0)and(N<=2) then
или:
if (N>=0)and(N<3) then
using namespace std;
int main()
{
int s, i;
cout << "s = ";
cin >> s;
double a[s], m1, m2;
int m1i, m2i, f, t;
/* Заполнение */
for (i = 0; i < s; i++)
{
cout << i << ':';
cin >> a[i];
}
/* Первый максимум */
m1i = 0;
m1 = a[m1i];
for (i = 1; i < s; i++)
{
if (a[i] > m1)
{
m1 = a[i];
m1i = i;
}
}
/* Второй максимум */
m2i = 0;
m2 = a[m2i];
for (i = 1; i < s; i++)
{
if (i == m1i) continue;
if (a[i] > m2)
{
m2 = a[i];
m2i = i;
}
}
/* Порядок итерации */
if (m1 > m2)
{
f = m2i;
t = m1i;
}
else
{
f = m1i;
t = m2i;
}
for (i = f + 1; i < t; i++)
{
a[i] = 0;
}
for (i = 0; i < s; i++)
{
cout << a[i] << ' ';
}
return 0;
}