Const n=4; Var x:array [1..n,1..n] of integer; s,i,j:integer; begin randomize; for i:=1 to n do begin for j:=1 to n do begin x[i,j] := random(100); write(x[i,j]:6); end; writeln; end; s:=0; for i:=1 to n do for j:= 1 to n do if i + j < n + 1 then s := s + x[i, j]; writeln('s=',s); readln; end.
11 марта в Японии произошло землетрясение магнитудой 8,8, оно считается самым сильным в истории страны. Но на планете каждый день случается несколько десятков землетрясений. По счастью, лишь немногие из них вызывают серьезные разрушения. Однако есть и такие, которые стирают с лица земли целые города.
На настоящее время самым сильным известным человечеству землетрясением за последние 100 лет, о котором существуют официальные задокументированные данные, являетсяземлетрясение на Гаити, произошедшее 12 января 2010 года около 17 часов по местному времени. После основного толчка магнитудой 7 по шкале Рихтера, который длился порядка 40 секунд, было зарегистрировано еще около 30, половина из которых была силой не менее 5.
Чудовищное по силе и интенсивности землетрясение унесло жизни, по разным оценкам, почти 232 тысяч человек, несколько миллионов человек осталось без крова, была практически полностью разрушена столица Гаити Порт-о-Пренс.
Таких катастрофических последствий можно было бы избежать, если бы власти страны были готовы к стихиям подобного масштаба. В частности, по сообщениям ряда СМИ, даже спустя несколько недель после землетрясения множество пострадавших оставалось без еды, воды и крыши над головой хоть и оказывалась, но ее было явно недостаточно, в частности, за едой необходимо было отстаивать длинные очереди. Повсеместная антисанитария вызвала вспышку опасных болезней, в том числе и холеру, от которой впоследствии также скончалось несколько сотен человек.
На втором месте - землетрясение, случившееся 28 июля в далеком 1976 году в китайском городе Таншане. Землетрясение силой 8, унесшее жизни 222 тысяч человек, и это, по всей видимости "сильно" приблизительные данные. По подсчетам некоторых международных организаций, жертв таншаньского землетрясения было гораздо больше, вплоть до 800 тысяч человек, при этом сила толчков была несколько ниже – 7, Точных цифр, естественно, нет - согласно архивным сводкам, предполагается, что китайское правительство умышленно в несколько раз занизило масштаб катастрофы.
В 2004 году 26 декабря произошло еще одно не менее разрушительное землетрясение, которое было признано самым смертоносным стихийным бедствием в современной истории. Обрушившись на многие страны Азии, оно нанесло удар по побережью Индийского океана, от Индонезии до восточной Африки. Землетрясение силой 9, по шкале Рихтера вызвало огромное цунами и унесло жизни около 230 тысяч человек.
Для того чтобы в младшем разряде была цифра 4 необходимо, чтобы 360 делилось на основание системы счисления без остатка, поэтому разложим число 360 на множители 360=2*2*2*3*3*5 => возможные системы счисления, в которых в младшем разряде будет цифра 4 будут получены произведениями данных чисел, в результате большие, чем 4 и не равные 10 посчитаем возможные комбинации, это и будет ответом на задачу всего выходит 19 систем счисления, подходящих условию (5,6,8,9,12,15,18,20,24,30,36,40,45,60,72,90,120,180,360)
Var x:array [1..n,1..n] of integer;
s,i,j:integer;
begin
randomize;
for i:=1 to n do begin
for j:=1 to n do begin
x[i,j] := random(100);
write(x[i,j]:6);
end;
writeln;
end;
s:=0;
for i:=1 to n do
for j:= 1 to n do
if i + j < n + 1
then
s := s + x[i, j];
writeln('s=',s);
readln;
end.