Question

всем привет. помогите, пожалуйста
составьте программу вычисления квадратов чисел от 1 до 20

Answer 1

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Range(1,20).Tabulate(t->t*t).Println(NewLine)
end.

Пример
(1,1)
(2,4)
(3,9)
(4,16)
(5,25)
(6,36)
(7,49)
(8,64)
(9,81)
(10,100)
(11,121)
(12,144)
(13,169)
(14,196)
(15,225)
(16,256)
(17,289)
(18,324)
(19,361)
(20,400)

Answer 2

вы не могли бы написать в програмной версии, а то я не поняла)))

Answer 3

Что такое "программная версия"? У Вас какие-то странные термины.

Answer 4

begin
Range(1,20).Tabulate(t->t*t).Println(NewLine)
end. - это и есть программа

Answer 5

спасибо большое

Answer 6

пожалуйста.