Паскаль. дано число x и последовательность 1,1+1/2,1+1/2+1/ первое число этой последовательности большее, чем x, вывести порядковый номер числа и его величину.

277

445

Посмотреть ответы 2

Ответы на вопрос:

nik868

Информатика

4,5(37 оценок)

Var a, y: real; i: integer; begin readln(a); if a < 1 then writeln(1, ' ', 1) else begin i : = 1; y : = 0; while y < = a do begin y : = y + 1 / i; inc(i); end; dec(i); writeln(i, ' ', y: 0: 10); end; end.

Nasta11111112356

Информатика

4,7(89 оценок)

Язык python пусть числа a, b, c if (a> =b and a< =c) or (a< =b and a> =c): print a elif (b> =a and b< =c) or (b< =a and b> =c): print b elif (c> =b and c< =a) or (c< =b and c> =a): print c и второй вариант print sorted([a,b,c])[1]