Во Определите значение переменной a после выполнения фрагмента программы:

a := 8;
b := 5;
if not (a < 5) then
a := 3;
Во Определите значение переменной a после выполнения фрагмента программы:

a := 7;
b := 5;
if (a > 5) and (a < b) then
a := a - 5;
Во Определите значение переменной a после выполнения фрагмента программы:

a := 15; b := 8;
if (a > 1) or (a < b) then
a := a - 5;
if (a > 1) and (a = b) then
a := a - 5;
Во Определите значение переменной a после выполнения фрагмента программы:

a := 8;
b := 3;
if (a > 1) and (a < b) then
a := a - 5;
if (a > 1) and (a = b) then
a := a - 5;
Во Какую логическую операцию нужно добавить в программу вместо многоточия, чтобы значение переменной a после выполнения фрагмента программы стало равно 19?

a := 11;
b := 8;
if (a > 1) ... (a < b) then
a := a - 7
else
a := a + 7;
Во Какую логическую операцию нужно добавить в программу вместо многоточия, чтобы значение переменной a после выполнения фрагмента программы стало равно 17?

a := 6;
b := 11;
if (a > 1) ... (a > b) then
a := a - 7
else
a := a + 7;
Во Какую логическую операцию нужно добавить в программу вместо многоточия, чтобы значение переменной a после выполнения фрагмента программы стало равно 15?

a := 20;
b := 5;
if (a < 1) ... (a > b) then
a := a - 5
else
a := a + 5;​

Program kontr;

var a,b:integer;

    c:char;

    n,m:string;

begin

writeln ('Введите первую цифру');

readln(a);

writeln ('Введите вторую цифру');

readln(b);

writeln ('Введите один из знаков: +,-,*,/');

readln(c);

case a of

0:n:='ноль';

1:n:='один';

2:n:='два';

3:n:='три';

4:n:='четыре';

5:n:='пять';

6:n:='шесть';

7:n:='семь';

8:n:='восемь';

9:n:='девять';

end;

case b of

0:m:='ноль';

1:m:='один';

2:m:='два';

3:m:='три';

4:m:='четыре';

5:m:='пять';

6:m:='шесть';

7:m:='семь';

8:m:='восемь';

9:m:='девять';

end;

 

case c of

'*': writeln (n,' умножить на ',m);

'/': writeln (n,' разделить на ',m);

'+': writeln (n,' плюс ',m);

'-': writeln (n,' минус ',m);

end;

end.

8110

11 марта в Японии произошло землетрясение магнитудой 8,8, оно считается самым сильным в истории страны. Но на планете каждый день случается несколько десятков землетрясений. По счастью, лишь немногие из них вызывают серьезные разрушения. Однако есть и такие, которые стирают с лица земли целые города. 

На настоящее время самым сильным известным человечеству землетрясением за последние 100 лет, о котором существуют официальные задокументированные данные, являетсяземлетрясение на Гаити, произошедшее 12 января 2010 года около 17 часов по местному времени. После основного толчка магнитудой 7 по шкале Рихтера, который длился порядка 40 секунд, было зарегистрировано еще около 30, половина из которых была силой не менее 5.

Чудовищное по силе и интенсивности землетрясение унесло жизни, по разным оценкам, почти 232 тысяч человек, несколько миллионов человек осталось без крова, была практически полностью разрушена столица Гаити Порт-о-Пренс.

Таких катастрофических последствий можно было бы избежать, если бы власти страны были готовы к стихиям подобного масштаба. В частности, по сообщениям ряда СМИ, даже спустя несколько недель после землетрясения множество пострадавших оставалось без еды, воды и крыши над головой хоть и оказывалась, но ее было явно недостаточно, в частности, за едой необходимо было отстаивать длинные очереди. Повсеместная антисанитария вызвала вспышку опасных болезней, в том числе и холеру, от которой впоследствии также скончалось несколько сотен человек.

На втором месте - землетрясение, случившееся 28 июля в далеком 1976 году в китайском городе Таншане. Землетрясение силой 8, унесшее жизни 222 тысяч человек, и это, по всей видимости "сильно" приблизительные данные. По подсчетам некоторых международных организаций, жертв таншаньского землетрясения было гораздо больше, вплоть до 800 тысяч человек, при этом сила толчков была несколько ниже – 7, Точных цифр, естественно, нет - согласно архивным сводкам, предполагается, что китайское правительство умышленно в несколько раз занизило масштаб катастрофы.

В 2004 году 26 декабря произошло еще одно не менее разрушительное землетрясение, которое было признано самым смертоносным стихийным бедствием в современной истории. Обрушившись на многие страны Азии, оно нанесло удар по побережью Индийского океана, от Индонезии до восточной Африки. Землетрясение силой 9, по шкале Рихтера вызвало огромное цунами и унесло жизни около 230 тысяч человек.