Вопрос задан 29.10.2023 в 00:38. Предмет Информатика. Спрашивает Волк Богдан.

СРОЧНО! 1.С клавиатуры вводится число от 1 до 999. Напиши программу, которая выводит на экран

количество разрядов в числе (1, 2 или 3).2.С клавиатуры вводятся целые числа a, b и c — коэффициенты квадратного уравнения. Напиши программу, которая решает квадратное уравнение и выводит корни x1 и x2 через пробел в порядке возрастания, если уравнение имеет два разных корня, корень х, если уравнение имеет два одинаковых корня, и строку "Нет решений", если уравнение не имеет корней.3.С клавиатуры вводятся целые числа x и y — координаты точки. Напиши программу, которая выводит номер координатной четверти, в которой лежит точка с координатами (х;у).
0 0
Перейти к ответам

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

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Романова Софья.

1)

var n,k: integer;

begin

readln(n);

if (n>0) and (n<10) then k:=1

else if (n>9) and (n<100) then k:=2

else k:=3;

write(k);

end.

2)

var a,b,c: integer;

D,x1,x2: real;

begin

readln(a,b,c);

D:=b*b-4*a*c;

if(D>0) then begin

x1:=((-1)*b+sqrt(D))/(2*a);

x2:=((-1)*b-sqrt(D))/(2*a);

write(x1,' ',x2);

end else if (D=0) then begin

x1:=(-1)*b/(2*a);

write(x1);

end else write('Нет решений');

end.

3)

var x,y: integer;

begin

readln(x,y);

if(x=0) or (y=0) then write('точка лежит на координатной оси')

else begin

if(x>0) then begin

if(y>0) then write('I')

else write('IV');

end else

if(y>0) then write('II')

else write('III');

end;

end.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
1. Для решения данной задачи можно воспользоваться функцией len(), которая возвращает количество элементов в объекте. В данном случае объектом будет строка, полученная из ввода пользователя. Программа будет выглядеть следующим образом: ```python number = int(input("Введите число от 1 до 999: ")) # получаем число от пользователя number_string = str(number) # преобразуем число в строку digits_count = len(number_string) # получаем количество символов в строке print("Количество разрядов в числе:", digits_count) ``` 2. Для решения квадратного уравнения можно воспользоваться формулой дискриминанта и условными операторами. Если дискриминант отрицателен, то у уравнения нет корней. Если дискриминант равен нулю, то есть один корень. Иначе есть два корня. Программа будет выглядеть следующим образом: ```python import math a = int(input("Введите коэффициент a: ")) # получаем коэффициенты от пользователя b = int(input("Введите коэффициент b: ")) c = int(input("Введите коэффициент c: ")) discriminant = b ** 2 - 4 * a * c # вычисляем значение дискриминанта if discriminant < 0: print("Нет решений") elif discriminant == 0: x = -b / (2 * a) print("Корень уравнения:", x) else: x1 = (-b + math.sqrt(discriminant)) / (2 * a) x2 = (-b - math.sqrt(discriminant)) / (2 * a) print("Корни уравнения:", x1, x2) ``` 3. Для определения номера координатной четверти можно использовать условные операторы. Если оба числа положительные, то точка находится в первой четверти, если одно число положительное, а другое отрицательное, то точка находится во второй или четвертой четверти, в зависимости от знаков чисел, и так далее. Программа будет выглядеть следующим образом: ```python x = int(input("Введите координату x: ")) # получаем координаты точки от пользователя y = int(input("Введите координату y: ")) if x > 0 and y > 0: print("Точка находится в первой четверти") elif x > 0 and y < 0: print("Точка находится в четвертой четверти") elif x < 0 and y > 0: print("Точка находится во второй четверти") elif x < 0 and y < 0: print("Точка находится в третьей четверти") else: print("Точка находится на оси или в начале координат") ``` Надеюсь, что эти программы помогут вам! Если у вас возникнут дополнительные вопросы, не стесняйтесь задавать.
0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос