Каково должно быть содержимое строки, помеченной ***, чтобы приведенная программа для расчета суммы s = 1 + 1/2 + 1/3 + … + 1/50 работала корректно?program ex3;vars: real; i: integer;begins:=0;***writeln(s);end. for i:=50 to 1 do s:=s+i/1; for i:=1 to 50 do s:=s-1/i; for i:1 to 1/50 do s:=s+i; for i:=1 to 50 do s:=s+1/i;

Каково должно быть содержимое строки, помеченной ***, чтобы приведенная программа работала корректно?program p1;vart: byte;beginrepeatwrite('Завершить программу? 1 - да, 2 - нет');readln(t);***end. while t=1; until false; until t=1; while 1;

9. Візьми участь у конкурсі «Хто швидше зафарбує рисунок». Обчисли значення буквених виразів, якщо a = 4; b = 2; c = -3. На рисунку праворуч за- фарбуй частини, що відповідають отриманим результатам. a) a² + c = 6) a+b-c= в) 2(a + b) = г) 3ас + b = 100 -5 80 9 -24 48 12 36 -6 -2 7 17 8 2 -15 6 13 1 30 -4 38 0 -25 3 -7 -3 -1 -16 д) 5b - (а + с) = -28 9 -9 e) 3c-b + a = -14 64 ж) 100(2b + a) = 4 11 21 19 3) c(2(b + 3a) + 10) = и) За² =

Индивиду, обладающему доходом в 25 ДЕ и функцией полезности денег V(c) = C2 предлагается принять участие в лотерее L = (-0,6, 1; 5/6, 1/6). Какое решение примет индивид, максимизирующий полезность? Вопрос 2Ответa.Принять участие и вложить 10 ДЕb.Не участвовать в лотерееc.Принять участие и вложить 15 ДЕd.Принять участие и вложить 25 ДЕ

Опрос показал, что готовность жильцов трех домов платить за озеленение их двора выражается следующими функциями: Р(1) =80 – Q,   Р(2) = 60 – Q,    Р(3) = 40 – Q, где Р(i) максимальная сумма денег, которую согласны заплатить за очередное дерево жильцы i –го дома (i = 1,2,3), Q -количество деревьев. Будем считать, что озеленение является чистым общественным благом, функция общественных предельных издержек проведения которого, имеет вид: SМС = 2 + Q. Определите оптимальное число посаженных деревьев.

Каково должно быть содержимое строки, помеченной ***, чтобы приведенная программа раскладывала целое число на множители?program p1;varx,m: integer;beginwrite('Введите число');readln(x);m:=2;if (x mod m) = 0 thenbeginwrite('*',m);x:=x div m;end***end. else m:=m+1/2; else m:=(m+1)/2; else m:=m+1; else m:=m/2; else m:=m-1;