Ответ:
Скажите значения переменных, тогда напишу программу.И на каком языке уточните.
INPUT "N="; N
FOR I = 1 TO N
S = S + 1 / (2 * I - 1)
NEXT I
<span>PRINT "S="; S</span>
1)Переводим все в дюймах дюйм=2.54 22,86/2,54=9
2)теперь все перемножаем 9*9*600*1200*4/8=29160000
Ответ:29160000 Байт
«Объект-заместитель» принято называть моделью, а исходный объект - прототипом или оригиналом.
• модель не является точной копией объекта-оригинала: она отражает только часть его свойств, отношений и особенностей поведения
• любая модель всегда отражает только часть признаков оригинала, можно создавать и использовать разные модели одного и того же объекта
<span>Модель — это объект, который используется в качестве «заместителя», представителя другого объекта (оригинала) с определенной целью.
</span>
<u>Модели используются человеком для:</u>
<span>• представления материальных предметов
• объяснения известных фактов
• проверки гипотез и получения новых знаний об исследуемых объектах
• прогнозирования
• управления
---
Пример:</span><span><span>
Исходный объект: медведь</span><span>
Объект-заместитель: плюшевый мишка</span><span>
Свойство: внешний облик
---
<em>p.s. Если найдутся умные люди, которые решат отметить это нарушением, то говорю сразу, что это не материал, который нужно сочинять, а доступная информация в любом учебнике или справочнике.</em></span></span>
{1}
var
n: integer;
begin
write ('Введите заработанную сумму: ');
readln (n);
write ('Вы получите: ', (n*0.77)*0.61)
end.
{2}
var
a: array of double;
n, i: byte;
sum: longint;
begin
write ('Введите кол-во дробных чисел: ');
readln (n);
setLength (a, n);
for i:=0 to n-1 do
begin
write ('Введите ', i+1, ' число: ');
readln (a[i]);
end;
for i:=0 to n-1 do
begin
writeln ('Целая часть ', i+1, ' числа: ', trunc(a[i]));
inc (sum, trunc(a[i]));
end;
write ('Сумма целых частей: ', sum);
end.
{3}
var
a, b, c, p: double;
begin
write ('Введите стороны треугольника: ');
readln (a, b, c);
if (a>=(b+c)) or (b>=(a+c)) or (c>=(b+a)) or (a<=0) or (b<=0) or (c<=0) then
write ('Такой треугольник не существует')
else begin
p:=(a+b+c)/2;
write ('Его S = ', sqrt (p*(p-a)*(p-b)*(p-c)):7:2, ' ед^2' );
end;
end.