группа туристов (220 человек) полностью заполнила несколько 50-местных и 35-местных автобусов.Известно,что всего было подано 5 автобусов.Сколько 50-местных и сколько 35-местных автобусов было занято туристами?решите пожалуйста задачу

Какое значение будет принемать значение Y после выполнения фрагментов программы:

1. var x,y: INTEGER;

BEGIN

y:=0;

for x:=1 to 9 do

y:=y+x;

writeln(y=,y);

END.

2.var x,y: INTEGER;

BEGIN 

y:=0;

for x:=10 downto 5 do

y:=y+1

writeln(y=,y);

END

3. var x,y: INTEGER;

BEGIN

y:=1;

x:=15;

while x>5 do

begin 

  x:=x-3;

  y:=y*x;

end;

writeln(y=,y)

END.

4. var x,y: INTEGER;

begin

   y:=1;

   x:=10;

repeat

   y:=y*x+x;

   x:=x-2;

until x<0;

writeln(y=,y);

end. 

пожалуйста напишите подробное решение и как получаются ответы

помогите соатавить 6 вопросов на тему русский лес. позарез!!!!! как можно скорее. плииииииииззззззззззз!!!!!! зарание спс.

произведения "Детство" Максима Горького. 1)Расскажите об одном из героев "Детства",использовав план характеристики. какой след оставил каждый из окружавших Алешу людей в его душе?

1)дано  целое число N(больше 0). Найти сумму 1+1/2+1/3.....1/N(вещественное число). Входные данные: ввести целое числоN(1<=n<=20)

Выходные данные: вывести сумму 1+1/2=1/3+.....1N с точностью до 4 цифр в дробной части.( в паскале)