//PASCAL ABC.NET
var i, a: integer; arr: array [1..10] of integer;
begin for i := 1 to 10 do read(arr[i]); for i := 1 to 10 do begin if arr[i] mod 6 = 0 then a += arr[i]; end; Write(a/10);end.
<u>Функции памяти.</u>приём информации из других устройств<em />;запоминание информации;выдача информации по запросу в другие устройства машины.
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
int n;
cin>>n;
float s=0;
for (int i=0;i<n;i+=2)
s=s+1.0/pow(2,i)-1.0/pow(2,i+1);
cout<<s;
return 0;
}
Вроде так
101010=42
110111=55
703=451
101=65
535=1000010111
111=11101111
А) D:\Школа\Ученики.
Б) D:\Школа\Ученики\Успеваемость.
В) D:\Школа\Ученики.
Г) D:\Школа\Ученики\Нарушения.
Ответ: 2.