решите задачу в программе PASCALABC.NET (вместо 17 выводится рандомное значение)ПОМОГИТЕ...

+338 голосов
2.2m просмотров

решите задачу в программе PASCALABC.NET (вместо 17 выводится рандомное значение)ПОМОГИТЕ ПОЖАЛУЙСТА


Информатика (87 баллов) | 2.2m просмотров
Дан 1 ответ
+103 голосов

Ответ:

--- PascalABC.NET 3.6.2 ---

//С циклом 'For'

begin

 var temp := 1;

 var len := readinteger();

 for var i := 1 to len do begin

   temp.Print;

   temp+=2;

 end;

end.

//Так же, если вы используете именно PascalABC.NET, вы можете использовать метод SeqGen(n, first: T, next: T -> T), возвращающий последовательность (в вашем случае, целых чисел), образованную по заданным параметрам.

begin

 SeqGen(readinteger(), 1, p -> p + 2).Println;

end.

Объяснение:

(1.6k баллов)