program ttt; var i,j,a,b,c: integer; beginreadln(a); readln(b); readln(c); if (a> b) then if (a> c) then begin write(a); if (b> c) then begin write(b); write(c) end; else begin write(c); write(b); endend; elseif (b> c) then begin write (b); if(a> c)then begin write(a); write(c); end; else begin write(c); write(a); end; end; else begin write(c); if(a> b) then begin write(a); write(b)end; else begin write(b); write(a); end; end; end; неоптимальный, но понятный алгоритм.а в другом случае можноо оптимизировать.. как- подумай -; )
Ответ дал: Гость
на вход "черного ящика"подается число 125. о чем в этом случае говорит отказ: кажеться а
Ответ дал: Гость
var s: string; i: longint; begin readln(s); for i: =length(s) downto 1 do begin if s[i]=' ' then delete(s,i,1); if (s[i]> ='1')and(s[i]< ='9') then delete(s,i,1); end; writeln(length(s)); end.
Ответ дал: Гость
как я поняла амур надо соединить с теми множествами в которые слово входит.
в множество слов, множество названий рек,множество слов на букву а входит
Популярные вопросы