Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
используется язык pascal
program pr;
var
mas: array[1..7] of integer;
i: integer;
begin
writeln('вводим значения в массив');
for i: =1 to 7 do readln (mas[i]);
writeln('выводим значения из массива');
for i: =7 downto 1 do writeln(mas[i]);
readln;
end;
253(8)=10101011(2)
2в4(16)=1010110100(2)
48(16)=1001000(2)
каждый цвет может иметь 4 значения 2^2
если базовых цвета 3(rgb) то всего получится 4*4*4=64 цвета
a: array [1..20] of integer;
i,max: integer;
max: =0;
for i: =1 to 20 do
if i mod 2=0 then a[i]: =random(50)+50
else a[i]: =random(50)+150;
if a[i]> max then max: =a[i];
write(a[i]: 4);
writeln;
writeln('max=',max);
end.
Популярные вопросы