Program pr1;
Var s,k,k1,k2: integer;
Begin
write('Задайте начальное и конечное значения параметра цикла: ');
readln (k1,k2);
s:=0;
for k:=k1 to k2 do
begin
s:=s+6;
writeln(s);
end
End.
Ответ:
commons.wikimedia.org - три части имени
org - верхний уровень
Объяснение:
Ответ:
Дано:
K=100;
N1=8;
N2=64;
Найти: I(общ.).
Решение:
I=K*i;
N=2^i => i1=3; i2=6;
I1=100*3=300(бит); I2=100*6=600(бит);
I(общ.)=600+300=900(бит)=112,5(байт).
Ответ: 112,5 байт.
Объяснение:
Добавляет новую область видимости. Пример:
with (Math) {
a = PI * r * r;
x = r * cos(PI);
y = r * sin(PI / 2);
}
Векторная графика
coreldraw
ilustator