К реке подошли капитан, повар и матрос. На берегу играют 2 темнокожих мальчика, у которых есть плот. Плот выдержать или 2 мальчиков, или одного взрослого. Как капитану, повару и матросу переправиться на другой берег так, чтобы плот остался у мальчиков НУЖНО
// PascalABC.NET 3.0,сборка 1076
begin
var n:=ReadInteger('Длина последовательности: ');
var a:=ArrRandom(n,-50,50);
Writeln('Исходная последовательность');
a.Println;
Writeln('Сумма элементов: ',a.Sum);
Write('Кол-во четных, кратных пяти: ');
Writeln(a.Where(x-> x mod 10 = 0).Count)
end.
Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1
Вот первая задача
Объяснение:
#include <stdio.h>
int main()
{
int k;
printf("Введите номер дня\n");
scanf("%i", &k);
if((k < 1)||(k > 365))
{
printf("День не подходит");
return 0; // немедленный выход из функции и приложения
}
int den = k % 7; //операция остаток от деления. Тут будет номер дня недели от 0 до 6
den = den + 1 + 2; // 2 - это номер первого дня года, вторника, 1 - это чтобы преобразовать из диапазона 0-6 в диапазон 1-7
printf("День номер %i был %i днем недели", k, den);
return 0;
}