1.Перечислите известные Вам носители данных. 2. Какой из носителей данных имеет наибольший объём?
3. У какой из файловых систем размер кластера наименьший?
4. Какие типы файлов можно хранить в архиве?
5. Объясните, в архиве все файлы уменьшаются в размере?
#include <iostream>
using namespace std;
int main()
{
int a1 = 2;
int d = -2;
int amount = 0;
int n;
cin >> n;
for (int i = 0; i < n; i++)
{
amount += a1;
cout << a1 << " ";
a1 += d;
}
cout << endl << amount;
}
Объяснение:
#include <iostream> // Библиотека ввода - вывода
using namespace std; // Пространство имён
int main()
{
int a1 = 2; // Первый элемент = 2
int d = -2; // Разность = -2
int amount = 0; // Сумма = 0
int n; // Создание целочисленной переменной n
cin >> n; // Ввод с клавиатуры
for (int i = 0; i < n; i++) // Идём от нуля до n
{
amount += a1; // Суммируем элемент
cout << a1 << " "; // Выводим элемент
a1 += d; // Узнаём следующий элемент прогрессии
}
cout << endl << amount; // Выводим сумму
}
Program a10;
var a,b:Array [1..100,1..100] of integer;
k,i,n,j,s:integer;
Begin
read(n);
For i:=1 to n do
begin
For j:=1 to n do
begin
read(a[i,j]);
end;
end;
i:=0;j:=0;s:=0;k:=0;
while i<=n do
begin
i:=i+1;j:=j+1;
if(a[i,j]>0)then k:=k+1;
s:=s+a[i,j];
end;
writeln(k,' ',s);
end.
2)
Program a10;
var a,b:Array [1..100,1..100] of real;
k,i,n,m,j:integer;
s:real;
Begin
read(n,m);
For i:=1 to n do
begin
For j:=1 to m do
begin
read(a[i,j]);
end;
end;
k:=0;
for j:=1 to m do
begin
s:=0;
for i:=1 to n do
begin
s:=s+a[i,j];
end;
for i:=1 to n do
begin
if(a[i,j]>(s-a[i,j]))then k:=k+1;
end;
end;
writeln(k);
end.