program z1;
ar x,y:integer;
begin
readln(x);
readln(y);
if (x=0) and (y=0) then write(0)
else
begin
if (x>=0) and (y>=0) then write(1);
if (x<=0) and (y>=0) then write(2);
if (x<=0) and (y<=0) then write(3);
if (x>=0) and (y<=0) then write(4)
end
end.
Объяснение:
Если точка лежит в начале координат, т.е. х = 0 и у = 0, то выводим 0, иначе выводим какой четверти принадлежит точка, начиная с 1 четверти и по порядку.
Нестрогие условия (>= и <=) и оператор write (нет перехода на новую строку) позволяют выводить два номера четверти, если точка лежит на одной из осей, а расположение условий для четвертей по порядку позволяет соблюсти условие о том, что сначала необходимо выводить меньший номер.
python
1)
from numpy import arange # нужно установить библиотеку numpy
for x in arange(4, -4, -0.5):
print('x =', str(x) + ' :', x * 3 - x * 2 + 16 * x - 43)
2)
number = int(input('Введите число: '))
primeNumbers = []
for i in range(1, number + 1):
numberDividers = 0
for z in range(1, i + 1):
if i / z == i // z:
numberDividers += 1
if numberDividers == 2:
primeNumbers.append(i)
if len(primeNumbers) == 0:
print('Нет простых чисел до числа ' + str(number))
else:
print('Простые числа:')
for i in primeNumbers:
print(i)
Поделитесь своими знаниями, ответьте на вопрос:
Ниже записан алгоритм. получив на вход число x, этот алгоритм печатает число m. известно, что x > 100. укажите наименьшее такое (т.е. большее 100) число x, при вводе которого алгоритм печатает 2. подробное решение var x, l, m: integer; begin readln(x); l : = x - 12; m : = x + 12; while l < > m do if l > m then l : = l - m else m : = m – l; writeln(m); end. подробное решение
function f(x: integer): integer;
var
L, M: integer;
begin
L := x - 12;
M := x + 12;
while L <> M do
if L > M then
L := L - M
else
M := M - L;
f := L;
end;
begin
var x := 100;
var r := 0;
repeat
x := x + 1;
r := f(x);
until r = 2;
writeln(x);
end.