Определите, количество чисел K, для которых следующая программа выведет такой же результат, что и для K = 18:
Паскаль |
Си |
var i, k: integer;
function F(x:integer):integer;
begin
F:=x*x;
end;
begin
i := 0;
readln(K);
while F(i) < K do
i:=i+1;
writeln(i);
END.
|
#include<stdio.h>
int F(int x)
{
return(x*x);
}
int main(void)
{
int i, K;
i = 0;
scanf(″%d″, &k);
while ( F(i) < K ) i++;
printf(″%d″, i);
}
|