2) Решил бы еще, но замучаюсь всё это в пэйнте рисовать:)
Информатика?
Попробуй нажать;
Ctrl+Alt+Home
1)
var
mas: array [1..5] of integer;
i:integer;
begin
for i:=1 to 5 do
read(mas[i]);
for i:=1 to 5 do begin
mas[i]:=mas[i]-20;
write(mas[i],' ');
end;
end.
2)
var
mas: array [1..8] of real;
i:integer;
begin
for i:=1 to 8 do
read(mas[i]);
for i:=1 to 8 do begin
if i mod 2 = 0 then
write(mas[i]-1,' ')
else
write(mas[i]+1,' ')
end;
end.
В шестнадцатиричной системе счисления цифры представляют собой обычные цифры от 0 до 9 и дальше - буквы от A до F
FFF - наибольшее трехзназное число в 16-ти-ричной системе счисления