'Microsofr QBasic 1.0
SCREEN 12
LINE (100, 150)-(350, 300), 3, B
LINE (350, 100)-(450, 300), 3, B
CIRCLE (200, 330), 30, 3, , , 640 / 480
CIRCLE (400, 330), 30, 3, , , 640 / 480
На каком языке требуется составить программу?
Var i,p:integer;
begin
p:=1;
for i:=-20 to 30 do
if i mod 3 = 0 then p*=i;
writeln(p);
<span>end.</span>
А) 1 2 3 4 5 6 ...(ш)
б) город на букву В = Воркута(Вологда), далее на А
Ответ: 1. получение новой информации;
2. изменение формы представления