Укажите те , которые вы считаете четко сформулированными. - нарядиться на новогодний -маскарад. - измерить температуру. - покрасить забор. - купить в магазине 300 г карамели "раковые шейки". - прочитать рассказ в. бианки "музыкант". - выучить наизусть басню и. крылова "стрекоза и муравей". - купить в магазине кефир, творог и другие молочные продукты. - устранить неиправность.

-купить в магазине 300 г карамели "раковые шейки".- прочитать рассказ в. бианки "музыкант".- выучить наизусть басню и. крылова "стрекоза и муравей".

1. вот так это можно решить "по-современному". // pascalabc.net 3.2, сборка 1353 от 27.11.2016 // внимание! если программа не работает, обновите версию! begin   var a: =arrrandom(readinteger('n=',50); a.println;   writeln('max=',a.max) end. пример n= 13 -11 16 -24 5 5 3 42 45 -46 45 22 43 -4 max=45 2. а так учат в большинстве const   nn=100; var   a: array[1..nn] of integer;   i,n,max: integer; begin   write('n='); read(n);   randomize;   max: =-100;   for i: =1 to n do begin       a[i]: =random(101)-50;       write(a[i],' ');       if a[i]> max then max: =a[i]       end;   writeln;   writeln('max=',max) end.

C++ #include < iostream> #include < cmath> #include < stdio.h> using namespace std; int main() { int a,b,c,d,r,r2,r3; cin > > a > > b > > c > > d; r=min(a,b); r2=min(r,c); r3=min(r2,d); cout < < r3; return 0; } pascalprogram project1; var a,b,c,d: integer; beginreadln (a,b,c,d); if ((a< =b) and (a< =c) and (a< =d)) then beginwriteln (a); endelse if ((b< =a) and (b< =c) and (b< =d)) then beginwriteln (b); endelse if ((c< =b) and (c< =a) and (c< =d)) then beginwriteln (c); endelse beginwriteln (d); end; end.