3. Напишите программу на Паскале вывода значения true, если ...

Question

3. Напишите программу на Паскале вывода значения true, если ...

Нюра

3. Напишите программу на Паскале вывода значения true, если точка с заданными координатами (х,у) лежит внутри заштрихованной области и false, если не лежит.

Есть ответ

18.12.2022

375

Ответ

Answer 1 · 18.12.2022

var x, y: integer;

begin

readln (x);

readln (y);

if (y > 0) and (y < 4) and (x < 4) and (x > -4) and (sqrt (x*x + y*y) < sqrt (4*4 * 4*4))

then writeln ('true')

else writeln ('false');

end.

если считать, что 1 клетка равна еденице.

3. Напишите программу на Паскале вывода значения true, если ...

3. Напишите программу на Паскале вывода значения true, если точка с заданными координатами (х,у) лежит внутри заштрихованной области и false, если не лежит.

Ответ

var x, y: integer; begin readln (x); readln (y); if (y > 0) and (y < 4) and (x < 4) and (x > -4) and (sqrt (x*x + y*y) < sqrt (4*4 * 4*4)) then writeln ('true') else writeln ('false'); end. если считать, что 1 клетка равна еденице.

var x, y: integer;

begin

readln (x);

readln (y);

if (y > 0) and (y < 4) and (x < 4) and (x > -4) and (sqrt (xx + yy) < sqrt (44 4*4))

then writeln ('true')

else writeln ('false');

end.

если считать, что 1 клетка равна еденице.