Регистрация
nikastezkaowl9vp
17.02.2022 02:31
Информатика
Есть ответ 👍

Для двух неравных чисел m и n определить какая из дробей m/n или n/m ближе к числу π . в первом случае число m удвоить, во втором удвоить число n .

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

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

DashaKarg3
DashaKarg3
4,8(68 оценок)

const pi = 3.14159265358;

var

m,n : integer;

begin

readln(m,n);

if ((m/n - pi) < (n/m - pi)) then

writeln (2 * m)

else

writeln(2*n);

end.

возможно туплю, ибо поздно уже. но у меня получилось так

djam111
djam111
4,5(49 оценок)
Var   a: array [1..50] of integer;   l: longint; begin   for l : = 1 to 50 do   begin     a[l] : = random(-5, 5);     write(a[l], ' ');   end;   l : = 1;   writeln();   foreach k: integer in a do     l *= k;   writeln(l); end.    

Популярно: Информатика