1)даны 15 чисел. найти разницу между максимальным и минимальным числом. 2)найти количество нечетных чисел среди первых 100.

Var a,b,c,d,i,m: integer; 1)  begin read(a); c: =a; b: =a; for i: =2 to 15 do begin read(a); if a> c then c: =a; if a< b then b: =a; end; m: =c-b; write(m); end. 2)var c,i: integer; begin for i: =1 to 100 do if i mod 2< > 0 then c: =c+1; write(c); end.

1) марка- знак того, что отправелнное письмо оплачено, то есть она давала информацию об этом

2) письма содержат информацию в письменной(символьной форме) любого языка, обычно воспринимаемую человеком

3)магнитофон- используется для чтения информаци с магнитых носителей(так называемых касет)

4) телефон- передает звуковуцю информацию на любы расстояния

5)телевизор- передает графическу и звууковую информацию на любые расстояния

6) спутниковая антена- позволяет обмениваться информацие со спутником

7)интернет- локальная сеть, используемая для передачи и храения информаци всех возможных видов

1. это с.с. в промежутке 4-75

от 4 до 13:

остаток от деления 75/х=3(х - с. т.е. 72/х - целое число:

х=4,6,8,9,12

дальше целочисленное частное делим опять же на х - с.с. и у нас должно получится 1 (10+3=13)

это выполняется только при х=8

теперь рассмотрим промежутки больше 13:

остаток от деления 75/х=13, т.е. 62/х - целое число, х=62

 

ответ:   8, 62

 

2. аналогичные операции с 84 и 14:

промежуток: 5-14

80/х - целое число:

х=5,8,10

повторяем деление у нас также должно получиться 1

выполняется только при х=5

теперь рассмотрим промежуток чисел больше 14:

70/х - целое число при х=35, 70

ответ:   5, 35, 70