uses crt; var i,s: integer; begin i: =2; s: =1; while i< =10 do begin s: =s*i; i: =i+2; end; write(s); end.
Ответ дал: Гость
а после 18 какое число идет? ? если 108 ,то тогда получается так 2*3=6, 3*6=18, 6*18=108,получается что первое число умножается на второе,второе на третье,третье на четверное и т.д
Ответ дал: Гость
program sir; var y,x,h: real; beginx: =280; h: =0.1; while h< =1 do begin y: =x*h; writeln('цена за ',h*1000,' грамм ',y,' руб'); h: =h+0.1 end; end.
Ответ дал: Гость
640*350=224 000 пикселей 224000*2=448 000 пикселей на 2-х страницах. 16 цветов - 4 битный цвет, то есть 2 пикселя занимают 1 байт. 448000/2=224 000 байт = 1 792 000 бит = 218,75 кб
Популярные вопросы