Рассматривается множество целых чисел, принадлежащих числовому отрезку [1082; 129932], в которых цифры записаны в порядке убывания при их прочтении слева направо, и при этом количество делителей каждого из этих чисел кратно трём. Найдите количество таких чисел и наибольшее такое число, начинающееся с цифры 7. В ответе запишите два целых числа: сначала количество, затем наибольшее такое число, начинающееся с цифры 7.

с2н6+cl2=c2h5сl+hcl

с2н6-этан

с2н5cl- хлорэтан или хлористый этил

ха-ха-ха)) учебник по информатике за 10

там все

программа №4

program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end.

потхоньку буду дополнять, не так все быстро)) 

№5

program р_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе') end. 

var

i,n: integer;

a: array [1..100] of integer;

begin

readln(n);

for i: =1 to n do

begin

if i mod 2 =0 then a[i]: =i-3

else a[i]: =i+3;

writeln(a[i]);

end;

end.

с каждым днем количество ряски увеличиваеется в 2 раза. 30 июня ряска покрыла всю поверхность озера, значит 29 июня ряской была покрыта половина озера.