Если первый ученик за 1ч может собрать M ведер яблок, 2-й — К
ведер, 3-й L ведер, то сколько ведер
яблок они соберут за t часов?

Вот простейший вариант, где вводятся соответственно стороны 1-го и 2-го треугольников. program triangles; var a1,b1,c1,a2,b2,c2: integer; begin writeln('введите стороны первого треугольника.'); read(a1,b1,c1); writeln('введите стороны второго треугольника, соответственно сторонам первого.'); read(a2,b2,c2); if ((a1=a2) and (b1=b2) and (c1=c2)) then writeln('да, треугольники равны.') else writeln('нет, треугольники не равны.'); end.

якщо загородка - прямокутник,

умовно з - це заєць,

то схема розташування зайців така:

 

з                          з

 

                              з

з              з       

 

три зайці - по кутках, два - біля стінок загородки.

блок схема,в jpeg формате (картинка ) сделана в word 2007.у вас ошибка составление программы (var max,x,e: real; ) [хотя вы запрашиваете x,y]

 

картинка загружаться не хочет =),на сайт.

зеркало

 

 

 

 

qbasic не знаю, знаю только вижуал бэйсик

 

for i = 1 to 10

  a(i) = i

next i

for i = 1 to 5

  b = a(10+1-i)

  a(10+1-i) = a(i)

  a(i) = b

next i

 

s = 0;

for i = a to b

  if (i mod 2 =1) and (i mod 3 = 0) then

          s = s + 1

  end if

next i