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

Var day: array[1..30] of boolean; i, pos, tree_height : integer; begin   readln(pos, tree_height);   for i : = 1 to 30 do       day[i] : = (random(100) > 30);   for i : = 1 to 30 do begin       if day[i] then pos : = pos + 2       else pos : = pos - 10;       if pos > tree_height then pos : = tree_height;       if pos < 0 then pos : = 0;       writeln('день ', i: 2, '(', day[i]: 5,') pos = ',pos);   end;   writeln(pos); end.

Program ulitka; var sunnyday: array [1..30] of boolean; a, b, c, i: integer; begin writeln('a = '); readln(a); writeln('b = '); readln(b); b : = b * 100; randomize; for i : = 1 to 30 do begin       if random(2) = 1 then sunnyday[i] : = true else sunnyday[i] : = false; end; for i : = 1 to 30 do begin   if sunnyday[i] = true thenbegin     a : = a + 2;     if a > b then     a : = b;   end   else   begin     a : = a - 10;     if a < 0 then     a : = 0;   end;   end; writeln('дни месяца были таковы: '); for i : = 1 to 30 do begin if sunnyday[i] = true then writeln(i, '. солнечный') else writeln(i, '. пасмурный') end; writeln('к концу 30 дня местоположение улитки равно ', a, ' см над землей'); end.

михаил - футбол,велоспорт.

николай - теннис, волейбол.

михаил - баскетбол, плавание.

решение: так как михаил не увликаеться  велоспортом, волейболом  и тенисом значет он занимаеться плаванием. тогда получаеться что тенисист - николай и потому как он самый старший то павел будет велосипедистом из этого выходит что волейболистом будет николай.

вот на c:

 

#include < stdio.h> int main(void){  int i;   for(i = 50; i > = -50; i -= 10)  {    printf("%d\n", i);     }  printf("\n");   system("pause");   return 0; }