Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
x,y: real;
begin
x: =-1;
while x< =1 do
y: =x*x*x;
writeln(y);
x: =x+0.1;
end;
end.
var s: string; begin writeln('как вас зовут? '); readln(s); case s of 'вася': s: ='василий'; 'петя': s: ='петр'; 'люся': s: ='людмила'; 'миха': s: ='михаил'; 'пупс': s: ='пупондий'; else s: ='я с вами не знакома'; end; writeln(s); readkey; end.
16 цветов=4 бита/пиксель
640*250=160000 пикселей — размер изображения
160000*4=640000 бит = 80000 байт.
l*pi*((r+a)^2- (r)^2)*p
p - плотность
Популярные вопросы