Энергетический кризис — явление, возникающее, когда спрос на энергоносители значительно выше их предложения. Его причины могут находиться в области логистики, политики или физического дефицита. Первый энергетический кризис начался осенью 1973, после того как ОПЕК сознательно снизила объёмы добычи нефти (примерно на 5 %), чтобы повлиять на мировые цены в свою пользу.
16 октября 1973 цена на нефть поднялась на 70 % с трёх долларов за баррель до пяти. В течение следующего года цена на нефть поднялась до двенадцати долларов.
Это событие вошло в историю под названием «нефтяное эмбарго», так как упомянутое снижение объёмов добычи было проведено из политических соображений и было инструментом давления государств ОПЕК на Запад в связи с их недовольством его поддержкой Израиля в Войне Судного дня.
Не понятно про "Жесткий" цикл. Но как вариант:
var i:integer;
begin
for i:=-30 to 50 do
if (i mod 3=0) and (i mod 4 =0) and(i<>0 then writeln(i);
end.
На выходе:
-24
-12
12
24
36
48
>>количества четных отрицательных чисел от -15 до 40
Очевидно, что ежели чётных отрицательных, то имеет смысл лишь от -15 до 0.
var counter, sigma : integer;
begin
counter := -15
sigma := 0;
while counter < 0 do
if (counter mod 2) = 0
then sigma += 1;
counter += 1;
writeln(sigma);
readln()
end.
1) 110100,11₂ = 2⁵+2⁴+2²+1/2+1/4=32+16+4+2/4+1/4=52=52,75
123,41₈=8²+2*8+3+4/8+1/64=64+16+3+33/64=83,515625
1DE,C8₁₆=16²+13*16+14+12/16+8/256=478,78125
2) 1001111110111,0111₂=11767,34₈=5111,7₁₆
1011110011100,11₂= 13634,6₈=179C,C₁₆
<span>3) 1011₂+11₂=1110₂ </span>
1011₂+111,1₂=10010,1₂
11₂+111,1₂= 1010.1₂
1011₂=11
11₂=3
111,1₂=7.5
1110₂=14
10010.1=18.5
1010.1₂=10.5
4) 101₂*1111,001₂= 1001011,101₂
101₂=5
1111,001=15.125
<span>1001011,101₂=75,625</span>
Ответ:
а)2 б)1 в)3 г)4
var a , b : double ;
writeln(a,b);
readln(a*b*1/2) ;
end
Я не помню синтаксис паскаля , так что не обессудь
чему вас в школе учат..