Информатика 10 класс паскаль

Вот три способа решения задачи с использованием разных типов циклов и конструкций условий:

Способ 1: использование цикла for

// вводим значения x
let x1 = 2;
let x2 = 7;

// перебираем значения x целых чисел от x1 до x2
for (let x = Math.min(x1, x2); x <= Math.max(x1, x2); x++) {
let y = x * x; // вычисляем значение y
console.log(`x = ${x}, y = ${y}`); // выводим результаты на экран
}


Способ 2: использование цикла while

// вводим значения x
let x1 = 2;
let x2 = 7;

// инициализируем переменную x значением меньшего из заданных
let x = Math.min(x1, x2);

// пока x не превысит большее из заданных значений, перебираем значения x
while (x <= Math.max(x1, x2)) {
let y = x * x; // вычисляем значение y
console.log(`x = ${x}, y = ${y}`); // выводим результаты на экран
x++; // увеличиваем значение x на 1
}

Способ 3: использование конструкции условий if/else

// вводим значения x
let x1 = 2;
let x2 = 7;

// определяем начальное и конечное значение x
let start = Math.min(x1, x2);
let end = Math.max(x1, x2);

// перебираем значения x целых чисел от start до end
for (let x = start; x <= end; x++) {
let y; // определяем переменную y
if (x < 0) {
y = x * x - 1; // если x меньше нуля, то y = x^2 - 1
} else if (x >= 0 && x <= 5) {
y = x * x; // если x от 0 до 5 включительно, то y = x^2
} else {
y = x * x + 1; // если x больше 5, то y = x^2 + 1
}
console.log(`x = ${x}, y = ${y}`); // выводим результаты на экран
}

1-ый способ (цикл for):

 Program P1; 

uses crt; 

var a, b, x: integer; 

begin 

clrscr; 

writeln ('Введите с клавиатуры 2 целых числа. После ввода каждого из чисел нажимайте клавишу Enter.'); 

write ('Введите 1-ое число: '); 

readln (a); 

write ('Введите 2-ое число: '); 

readln (b); 

if a=b then writeln ('Ответ: y=', sqr(a)) else 

if ab then begin 

   writeln ('Значения функции y=x^2:'); 

   for x:=b to a do writeln (x, '^2 = ', sqr (x)); 

   end; 

write ('Программа завершена. Для выхода нажмите клавишу Enter.'); 

readkey; 

end. 

2-ой способ (цикл While):

 Program P1; 

uses crt; 

var a, b, x: integer; 

begin 

clrscr; 

writeln ('Введите с клавиатуры 2 целых числа. После ввода каждого из чисел нажимайте клавишу Enter.');  

write ('Введите 1-ое число: ');  

readln (a);  

write ('Введите 2-ое число: ');  

readln (b);  

if a=b then writeln ('Ответ: y=', sqr(a)) else 

if aa; 

   end; 

write ('Программа завершена. Для выхода нажмите клавишу Enter.'); 

readkey; 

end. 

Способ 1 - цикл for:
a = int(input("Введите первое число: "))
b = int(input("Введите второе число: "))

if a > b:
a, b = b, a

for x in range(a, b+1):
y = x**2
print(f"x = {x}, y = {y}")

Способ 2 - цикл while:
a = int(input("Введите первое число: "))
b = int(input("Введите второе число: "))

if a > b:
a, b = b, a

x = a

while x <= b:
y = x**2
print(f"x = {x}, y = {y}")
x += 1
Способ 3 - цикл do-while
a = int(input("Введите первое число: "))
b = int(input("Введите второе число: "))

if a > b:
a, b = b, a

x = a

while True:
y = x**2
print(f"x = {x}, y = {y}")
x += 1
if x > b:
break
Во всех трех способах используется конструкция if-else для проверки, какое из введенных чисел является меньшим. В зависимости от результата проверки, переменные a и b могут меняться местами. Затем используется цикл для перебора всех целых чисел от a до b включительно. В каждой итерации цикла вычисляется значение функции y и выводятся на экран значения x и y.