Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
паскаль же?
var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin
d: =d+k;
val(s,k,err);
end;
write (d);
end.
uses graph; {подключен модуль graph}var x,y,h: integer; procedure grinit; {процедура инициализации режима графики}var graphdriver: integer; {для графического адаптера} graphmode : integer; {для графического режима} errorcode : integer; {для кода ошибки}begin graphdriver : =detect; {режим автоопределения} initgraph(graphdriver ,graphmode,''); {инициализация} errorcode : =graphresult; {результат инициализации} if errorcode < > grok then {если не успешно,} begin writeln('ошибка графики: ',grapherrormsg(errorcode )); writeln('программа остановлена.'); halt(1) end {if}end; begin grinit; {вызов инициализации} x: =getmaxx div 2; y: =getmaxy div 2; h: = 30; {кол-во шагов до финиша} while x+y> 0 do begin cleardevice; circle(x, y, 10); delay(100); x: = x + getmaxx div h; y: = y - getmaxy div h; end; readln; {пауза до нажатия } closegraph; {закрытие графического режима}end.
1) 6 (худший вариант - 5+1)
2) 4 (худший вариант - 3+1)
3) 7 (худший вариант - 5+2)
4) 5 (худший вариант - 3+2)
350*200 = 700000 точек используется в изображении
1 бит 2 цвета4 бита 16 цветов8 бит 256 цветов16 бит 65 000 цветов24 бит 16,7 миллионов цветов.
теперь считай, сколько битов ты выделяешь на точку1 бит = 0.125 байта24 бита = 3 байта
Популярные вопросы