• Ввести два целых числа a и b ( a<b)и вывести квадраты всех чисел от a до b

Ответы 1

  • var   a, b: integer;  begin   read(a, b);   SeqGen(b - a + 1, x -> sqr(x), a).Println; end.
    • Автор:

      codytmyi
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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