Нет возможсти проверить. Если неправильно - напиши.
______________
var x : integer;
begin
for x:=36 to 1477 do begin
if x div 8 = 0 then
writeln(x/2);
if x div 7 = 0 then
writeln(x*2);
end;
end.
Вопрос построен не корректно. Прошу уточнить что имелось в виду
Прости,но это наверно глупый вопрос а ты в каком классе?
640 * 200 = 128 000 пикселей
Индексы 0, 1, 2, 3, 4, 5...
Ответ: A