Порядок перемещения:
0. 0 (начальное положение)
1. 0+3=3
2. 3-2=1 - нечетное
3. 1+4=4
4. 4+3=7
5. 7-2=5 - нечетное
6. 5+3=8
7. 8-2=6
8. 6-2=4 - четное
9. Закрасить
Итого закрашена 1 точка, ответ: 1.
узнаем количество точек 640*480=307200
1 пиксель 3 байта, вычисляем размер картинки
3*307200=921600 байт.
скорость модема = 921600 делим на время 256
скорость = 921600/256=3600 байт в секунду
Если в палитре 16 м цветов.
1 пиксель кодируется 24 бит или 3 байта, а это и есть параметр нашего изображения. Тут считать нечего.
Ответ: 3600 байт в секунду.
Var
s: string;
i: integer;
begin
readln(s);
for i:=length(s) downto 1 do
if s[i] = ' ' then
delete(s, i, 1);
writeln(s);
<span>end.
Пример входных данных: Мама мыла раму
</span>Пример выходных данных: Мамамылараму
program w7w7;
var a:real;
begin
readln (a);
if a<0 then writeln ('otritsatelnoe chislo');
if a>0 then writeln ('pologitelnoe chislo');
end.
Сделай так, как на картинке - у меня так работает. У тебя нет выхода из цикла - n вводится один раз и больше не изменяется, как оно может стать равным 0?