• Напишите программу на языке Паскаль для задачи: Ввести числа a и b, и вывести квадраты и кубы целых чисел от a до b.

Ответы 1

  • 1)program square_cube; // с циклом for var a, b: integer;beginwriteln(\'enter two numbers with a space \');readln(a, b);for i: integer:= a to b do writeln(power(i, 2) : 8, power(i, 3) : 8)end.

    2)program square_cube1; //c циклом whilevar a, b: integer;beginwriteln(\'enter two numbers with a space \');readln(a, b);while (a < b) or (a = b) do beginwriteln(power(a, 2) : 8, power(a, 3) : 8);a:= a + 1;endend.

    3)program square_cube2; //с циклом repeatvar a, b: integer;beginwriteln(\'enter two numbers with a space \');readln(a, b);repeatwriteln(power(a, 2) : 8, power(a, 3) : 8);a:= a + 1;until a = b + 1;end.

    • Автор:

      andy955
    • 4 года назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years