Var a,b:integer;begina:=20;b:=21;repeata:=a+b;b:=b+1;until (b>99);writeln(a);end.
Program n1;
var i,sum,a,k: integer;
begin
sum:=0;
k:=0;
for i:=1 to 20 do
begin
readln(a);
if a<0 then begin
sum:=sum+a;
k:=k+1;
end;
end;
write(sum/k);
end.
2. 123689
3. 1ж2а3д4в
4. 987
5. 238
6. в
7. 423156
8. в
9. 720
10. 156
#include<iostream>
using namespace std;
int main()
{
int A;
cin >> A;
int Min = A;
int Max = A;
while(A)
{
cin >> A;
if (Max < A && A!=0) Max = A;
if (Min > A && A!=0) Min = A;
}
cout <<"Min = "<<Min<<"\n";
cout <<"Max = "<<Max<<"\n";
cout <<"Min - Max = "<<Min-Max<<"\n";
return 0;
}
4. Для хранения цветовой палитры, содержащей 256 цветов, необходимо выделить 8 бит = 1 байт данных ( 2 ^ 8 = 256). Каждый цвет палитры будет кодировать бинарный код, состоящий из 8 разрядов.
Изображение размером 10 на 10 точек состоит из 10 * 10 = 100 пикселей.
Каждый пиксель изображения должен нести информацию о цвете, следовательно, для хранения всей картинки потребуется 8 * 100 = 800 бит = 100 байт.
Ответ: информационный объём изображения 800 бит (100 байт).