Напишите в с++ дан порядковый номер дня года (отсчет идет с 1-го января выведите номер дня недели этого дня, если 1 января — вторник. формат входных данных: вводится номер дня года — целое число k (1≤k≤365). формат выходных данных: требуется вывести номер дня недели для данного дня года (понедельник — 1, вторник — 2, воскресенье — 7). мэрия города м-ска приняла решение провести реновацию домов на улице льва толстого. как известно, дома на этой улице нумеруются натуральными числами от 1 до n, при этом на одной части улицы стоят дома с чётными номерами, а на другой — с нечётными. кроме этого, дома с номерами от l до r относятся к застройке, и под программу реновации не . мэрии определить, сколько домов попадет под программу реновации на чётной стороне улицы. формат входных данных на вход программе три целых числа n, l и r (1 ≤ l ≤ r ≤ n ≤ 1018). формат выходных данных требуется вывести одно целое число — количество домов, которые попадут под программу реновации на чётной стороне улицы. примечания в первом примере из условия на чётной стороне улицы 5 домов — 2, 4, 6, 8 и 10. из них дома 4 и 6 относятся к застройке, поэтому под программу реновации не попадут. оставшиеся три дома имеют номера 2, 8, 10. во втором примере, вся чётная сторона улицы относится к застройке.
Ответы
Program smallest;<br /><br />var <br />a,b,c:integer;<br /><br />begin<br /><br />write('введите а: ');<br />readln(a);<br />write('введите b: ');<br />readln(b);<br />write('введите c: ');<br />readln(c);<br /><br />if (a - b) > 0 then <br />begin<br />if (a - c) > 0 then<br />writeln('a - наибольшее!');<br />end;<br /><br />if (b - a) > 0 then<br />begin<br />if (b - c) > 0 then<br />writeln('b - наибольшее!');<br />end;<br /><br />if (c - a) > 0 then<br />begin<br />if (c - b) > 0 then<br />writeln('c - наибольшее!');<br />end;<br /><br />end.
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var m:=ReadInteger('Количество элементов в массиве А (m):');
var n:=ReadInteger('Количество элементов в массиве B (n):');
var k:=ReadInteger('Позиция вставки k (1<k<m):');
if (k>1) and (k<m) then begin
var a:=ArrRandom(m,1,99); Writeln('Массив A'); a.Println;
var b:=ArrRandom(n,1,99); Writeln('Массив B'); b.Println;
Writeln('Результат вставки'); (a[:k]+b+a[k:]).Println
end
else Writeln('Вы нарушили условие 1<k<m')
end.
Тестовое решение
Количество элементов в массиве А (m): 10
Количество элементов в массиве B (n): 6
Позиция вставки k (1<k<m): 4
Массив A
68 64 30 75 36 15 50 39 92 26
Массив B
56 68 97 30 95 63
Результат вставки
68 64 30 75 56 68 97 30 95 63 36 15 50 39 92 26
begin
var m:=ReadInteger('Количество элементов в массиве А (m):');
var n:=ReadInteger('Количество элементов в массиве B (n):');
var k:=ReadInteger('Позиция вставки k (1<k<m):');
if (k>1) and (k<m) then begin
var a:=ArrRandom(m,1,99); Writeln('Массив A'); a.Println;
var b:=ArrRandom(n,1,99); Writeln('Массив B'); b.Println;
Writeln('Результат вставки'); (a[:k]+b+a[k:]).Println
end
else Writeln('Вы нарушили условие 1<k<m')
end.
Тестовое решение
Количество элементов в массиве А (m): 10
Количество элементов в массиве B (n): 6
Позиция вставки k (1<k<m): 4
Массив A
68 64 30 75 36 15 50 39 92 26
Массив B
56 68 97 30 95 63
Результат вставки
68 64 30 75 56 68 97 30 95 63 36 15 50 39 92 26
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Какой принцип отбора записей представлен в изображении?
Автор: Pavlovna-Golovitinskaya378
Самое легкое но у меня красного нет мозгов, только одна косточка
Автор: Pokupatel
Қарым қатынас ойындары қандай эрекеттердің орындалуына қажеи етеді
Автор: Evsevia-a
///1
#include <iostream>
using namespace std;
main()
{
int k;
cin >> k;
cout << (k % 7 ) + 1;
return 0;
}
///2
#include <iostream>
using namespace std;
main()
{
long int N, L, R;
cin >> N >> L >> R;
cout << N / 2 + (L + 1) / 2 - R / 2 - 1;
return 0;
}
Объяснение: