Var
n,s,k,a,i:integer;
begin
Read(n);
s:=0; k:=0;
for i:=1 to n do begin
Read(a);
s:=s+a;
if a mod 2=0 then Inc(k)
end;
Writeln(s,' ',k)
end.
Результат
7 2 3 -2 4 -7 10 1
11 4
После 517 года до н. э. Дарий ввёл в Ахеменидской державе монетную единицу, составляющую основу единой для всей империи денежной системы, а именно золотой дарик
весом 8,4 г. Чеканка золотой монеты была прерогативой только
персидского царя. Благодаря тому, что дарик содержал всего 3 % примеси,
он в течение нескольких веков занимал положение основной золотой монеты в
торговом мире. Серебряные и более мелкие медные монеты чеканили
персидские сатрапы, а также автономные города и зависимые цари.
Итак. Общий размер файла 1,5 = 1536 Мбайт. Размер буфера T 128 Мбайт. Значит, для передачи файла через этот буфер его потребуется заполнить 1536 / 128 = 12 раз. Получилось целое число, поэтому мы посчитаем время, которое требуется на шаги 1-6, и умножим его на 12.
Так как ничего не сказано о времени на закрытие соединения, будем считать, что на это время не тратится.
1) Устанавливаем соединение с А - 1 секунда
2) Принимаем от устройства А 128 Мбайт со скоростью 8 Мбайт в секунду - 128 / 8 = 16 секунд
3) Закрываем соединение с А
4) Открываем соединение с В - 4 секунды
5) Передаём устройству В 128 Мбайт со скорость 2 Мбайта в секунду - 128 / 2 = 64 секунды
6) Закрываем соединение с В
Итого: 1+16+4+64 = 85 секунд
85 * 12 = 1020 секунд = 17 минут.
Ответ: 17 минут.
Var
i,N,A,k:integer;
Begin
k:=0;
Write('N = ');Read(N);
For i:= 1 to N do
Begin
Read(A);
if (A mod 10 = 8) then k:=k+1;
End;
WriteLn(k);
End.
На языке С++:
int summ = 0;
for (i = 1; i <= 100; ++i)
{
if (i % 4 == 0) // т.е. если остаток от деления на 4 равен 0, то суммируем
{
summ = i + summ;
}
}
