Question

«3»: Ввести натуральное число вывести квадраты и кубы всех чисел от 1 до этого числа. Пример: Введите натуральное число: 3 1: 1 1 2: 4 8 3: 9 27 «4»: Ввести два целых числа a и b (a ≤ b) и вывести квадраты все чисел от a до b. Пример: Введите два числа: 4 5 4*4=16 5*5=25 На языке Паскаль

Answer 1

Ответ:

1.

program z1;

var a,i: integer;

begin

writeln ('Введите натуральное число:');

readln (a);

for i:=1 to a do writeln(i,': ',i*i,' ',sqr(i)*i)

end.

2.

program z2;

var a,b,i: integer;

begin

writeln ('Введите два числа:');

read (a,b);

for i:=a to b do writeln(i,'*',i,'=',sqr(i))

end.

Answer 2

Конечно, вот примеры программ на разных языках программирования для выполнения указанных задач.

Пример на Python (вводите исходное число и программа выведет квадраты и кубы всех чисел от 1 до этого числа):

pythonCopy code
n = int(input("Введите натуральное число: "))
for i in range(1, n + 1):
    print(f"{i}: {i**2} {i**3}")

Пример на C++ (вводите исходное число и программа выведет квадраты и кубы всех чисел от 1 до этого числа):

cppCopy code
#include <iostream>
using namespace std;

int main() {
    int n;
    cout << "Введите натуральное число: ";
    cin >> n;
    for (int i = 1; i <= n; ++i) {
        cout << i << ": " << i * i << " " << i * i * i << endl;
    }
    return 0;
}

Пример на Pascal (вводите два числа a и b, и программа выведет квадраты всех чисел от a до b):

pascalCopy code
program Squares;
var
  a, b, i: integer;
begin
  writeln('Введите два числа:');
  readln(a, b);
  for i := a to b do
    writeln(i, '*', i, '=', i * i);
end.

Просто скопируйте соответствующий пример кода для выбранного вами языка программирования и выполните его в среде разработки, подставив необходимые значения.