Какой блок не соответствует решению задачи: повернуть оба мотора на 0,5 оборота
50
0.5 x
0.5
1
2
3
Все соответствуют
1-й блок
2-й блок
3-й блок​

program first; var i,a,b: integer; begin  cls;   read(a,b,i);   if a< 0 then write(sqr(a));

  if b< 0 then write(sqr(b));

  if i< 0 then write(sqr(i))end.

1)

program m; uses crt; var i,a,b,c,min: integer; beginclrscr; readln(a,b,c);

if a< min then min: =a; if b< min then min: =b; if c< min then min: =c; writeln('              ',min); readkey; end.

2)

program m; uses crt; var i,a,b,c,min,d: integer; beginclrscr; readln(a); min: =a; for i: =1 to 2 do                       

                                                                beginreadln(a); if a< min then min: =a;                                                             end; writeln(min);

readkey;

end.

3)

program m; uses crt; var i,a,b,c,min,d: integer; beginclrscr; readln(a,b,c); if a< b then b: =a; if c< a then b: =c; writeln(b); readkey; end.

var

n,a: integer;

begin

readln(n);

a: =(n mod 10)*1000+((n mod 100) div 10)*100 + ((n mod 1000) div 100)*10+ n div 1000;

if n> a then

writeln('число ', n, ' больше перевертыша ', a)

else

writeln('перевертыш ', a, ' больше числа ', n);

end.

иванов - парикмахер

петров - плотник

сидоров - мельник

гришин - почтальон

алексеев маляр