написать код для робота. Всего 4 ситуации. В 1-ой ситуации всего надо закрасить 5 клеток. Во 2-ой ситуации всего 1 клетка, достаточно всего лишь закрасить ее, и все. В 3-ей и 4-ой ситуации надо закрасить по 7 клеток.

например провели 5 измирений плотности раствора. пусть 1 первое измирение n1, второе-n2,   3-n3, 4- n4,5- n5. тогда програма будет виглядеть так:

program n1;

uses crt;  

var n1,n2,n3,n4,n5,s: real;

begin

              read(n1,n2,n3,n4,n5);

              s: =(n1+n2+n3+n4+n5)/5;

              write('s=',s);

end.

program ml; uses crt; var x,i: integer;       w,l: real; beginclrscr; readln(x); l: =x; for i: =1 to x do                                                beginw: =w+1; l: =x/w; if frac(l) = 0 then writeln(l: 2: 0);                                                                                               end; readkey; end.

v=331+0.6t

в зимний день- v=331+0.6*(-35)=310 м/с

в летний день- v=331+0.6*30=349 м/с

qbasic

screen 7

input x

input y

input c

s=x+y/2*c

print "x+y/2*c="; s

end