Информатика, опубликовано 09.02.2019 08:50
Дан двоичный код четырехцветного ресунка и кодовая таблица цветов.востанови ресунок по его двоечному коду. цвет. белый. черный. голубой. красный. двоичные коды. 00 01 10 11 00 00 00 11 11 00 00 00 00 00 00 10 01 11 11 11 00 00 00 00 10 00 00 00 00 00 00 00 00 10 00 00 00 00 00 00 10 10 10 00 00 00 00 10 01 10 10 00 00 00 10 01 10 01 10 00 10 10 10 10 10 10 10 00 00 00 00 11 00 11 00 00 00 00 11 00 00 11 00 00 00 11 00 00 00 11 00 00
Ответ оставил: Гость
Ответ оставил: Гость
А что сделать надо? Исправить код? Держи. Вроде так.
var m, k, i; integer;
mas; array [1..10] of integer;
begin
mas[1]:=14; mas[2]:=-4; mas[3]=12;
mas [4]:=-6; mas[5]:=8; mas[6]:=-10; mas[7]:=-8; mas[8]:=-9; mas[9]:=6; mas[10]:=-5;
m:=0; k:=0
for i:=1 to 10 do
if (mas[i]<0) and (i mod 2=0) then k:=k+mas
if mas[i]<10 then m:=m+mas[i]
write(m)+(k)
end.
var m, k, i; integer;
mas; array [1..10] of integer;
begin
mas[1]:=14; mas[2]:=-4; mas[3]=12;
mas [4]:=-6; mas[5]:=8; mas[6]:=-10; mas[7]:=-8; mas[8]:=-9; mas[9]:=6; mas[10]:=-5;
m:=0; k:=0
for i:=1 to 10 do
if (mas[i]<0) and (i mod 2=0) then k:=k+mas
if mas[i]<10 then m:=m+mas[i]
write(m)+(k)
end.
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01