Var x:real;
begin
x := -4;
while x <= 4 do begin
writeln('x=',x : 2 : 2,' y=', abs(x-2)+abs(x+1) : 2 : 2);
x := x + 0.5;
end;
readln; //задержка ввода
end.
Const
n=5;
var
a:array[1..n,1..n]of integer;
i,j,k:integer;
begin
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(10);
write(a[i,j]:3);
end;
writeln;
end;
j:=n;
for i:=1 to n do
begin
if a[i,j]<5 then k:=k+1;
j:=j-1;
end;
writeln('Ответ: ',k);
<span>end. </span>
1)128=2^7 Для хранения цвета надо 7 бит
V=2048*2048*7/8=3670016 байта=3584 кБайта=3,5 Мбайта
2) 3072*8=4096*x
x=6 бит
Число цветов=2^6=64 цвета
Твой пример=0*2+1*2+0*2+1*2+0*2+1*2=0+2+0+8+0+32=42(10)
ответ точно правильный у меня 5)
#include <string>#include <iostream>using namespace std;main(){ string s1, s2, s3, ans; cin >> s1 >> s2 >> s3; if(s1.size() >= s2.size() && s1.size() >= s3.size()) ans = s1; else if(s2.size() >= s3.size()) ans = s2; else ans = s3; for(int i = 0; i < ans.size(); i++) cout << char(int(ans[i]) - 32);}