Дано целое число m> 10. получите целое k, при котором k^2

Var m, k: integer; begin       readln(m);       for k : = round(sqrt(m)) downto 0 do           if (sqr(k) < m) then writeln(k, '^2 < ', m); end.вот так, на паскале + блок-схема =)

Program n;   var          m: array[1..12] of integer;           i,k: integer; begin randomize; k: =0; for i: =1 to 12 do begin     m[i]: =random(41)+150;   write(m[i],' ');       if   m[i]> 180 then k: =k+1;   end;   writeln; if k> 0 then writeln('такой ученик есть) else writeln('такого ученика нет'); end.program n; var        m: array[1..12] of integer;         i,k: integer; beginrandomize; k: =0; for i: =1 to 12 do begin    m[i]: =random(41)+150;   write(m[i],' ');     if   m[i]< 160 then k: =k+1;   end;   writeln; if k> 0 then writeln(k,'   ученик(ов/а) имеют рост меньше 160') else writeln('учеников, рост которых меньше 160, нет'); end.

Using system; public class test { public static void main() { double a,b,c,d; console.writeline("программа для решения квадратного уравнения вида ax^2+bx+c=0"); console.write("введите a: a="); a=double.parse(console.; console.write("введите b: b="); b=double.parse(console.; console.write("введите c: c="); c=double.parse(console.; console.writeline("решаем уравнение: "); console.writeline(a+"*x^2+("+b+")*x+("+c+")=0"); d=b*b-4*a*c; console.writeline("d="+b*b+"-"+"("+4*a*c+")="+d); if (d< 0){ console.write("d< 0 => нет действительных корней"); } else if (d> 0) { console.writeline("d> 0 => уравнение имеет 2 действительных корня"); console.writeline("x1="+(-b+math.sqrt(d))/(2*a)); console.writeline("x2="+(-b-math.sqrt(d))/(2*a)); } else{ console.writeline("d=0 => уравнение имеет 2 корня"); console.writeline("x1=x2="+(-b/(2*; } } }