Отметьте все числа, которые делятся на 4. 1) 101002 2) 11101002 3) 1101012 4) 10110102 5) 11110102

1)252750,5 2)2775250,5 3)275253 4)2527525,5 5)2777525,5

#CCCCCC = rgb(204,204,204) серый 
#FFCCCC = rgb(255,204,204) розовый 
#CCCCFF = rgb(204,204,255) светло-синий 
#000066 = rgb(0,0,102) темно синий 
#FF66FF = rgb(255,102,255) светло-пурпурный 
#CCFFFF = rgb(204,255,255) светло-голубой 
#992299 = rgb(154,133,154) темн-пурпурный 
#999900 = rgb(153,153,0) желто-зеленый 
#99FF99 = rgb(153,255,153) светло-зеленый

А что сделать надо? Исправить код? Держи. Вроде так.

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.

Ах ты сучок
колллллллллллллллллллллллртаоврповропрворп