Begin
for a:= 1 to 20 do
for b:= 1 to 20 do
for c:= 1 to 20 do
begin
if a*a+b*b=c*c then
writeln(a:4,b:4,c:4);
end;
<span>end.</span>
Uses crt;
const n=12;
var m:array[1..n] of integer;
k,s,i:integer;
begin
randomize;
for i:=1 to n do
begin
m[i]:=random(9)+1;
writeln(m[i]);
if m[i] mod 2<>0 then begin inc(k); s:=s+m[i]; end;
end;
writeln;
writeln(k);
writeln(s);
end.
задание 1
i 1 2 3 4
S= 128 128-3=125 125-3=122 122-3=119 119-3=116
Ответ: S=116
Задание 2
i 1 2
j 2 3 2 3
S=0 S=1+2=3 S=1+3=5 S=2+2=4 S=2+3=5
Ответ: S=5 (конечный результат)
1. Определяем количество точек в изображении
(5×24)×(4×24) = 24²×5×4 = 20×24² = 20×576=11 520
2. Определяем глубину цвета в битах
8192 < 15000 < 16384; 2¹³ < 15000 < 2¹⁴ ⇒ потребуется 14 бит.
3. Определяем объем памяти
11 520 × 14 = 161 280 бит = 161280/8 = 20 160 байт = 20160/1024 ≈ 19.7 Кбайт
В шестнадцатеричной системе счисления для записи цифр, старше 9, приняты обозначения :
A₁₆ =10₁₀ ; B₁₆ =11₁₀ ; C₁₆ =12₁₀ ; D₁₆ =13₁₀ ; E₁₆ =14₁₀ ; F₁₆ =15₁₀
1. ABC₁₆ = 10·16² + 11·16 + 12 = 2748₁₀ = 2748
2. a₁₆ = 341₁₆ = 3·16² + 4·16 + 1 = 833₁₀ = 833
3. a₃ = 221₃ = 2·3² + 2·3 + 1 = 25₁₀ = 25
4. Условие можно прочитать по-разному
1010₁₆ = 1·16³ + 0·16² + 1·16 + 0 = 4096 + 16 = 4112₁₀ = 4112
10101₆ = 1·6⁴ + 0·6³ + 1·6² + 0·6 + 1 = 1296 + 36 + 1 = 1333₁₀ = 1333