Напечатать "столбиком": а) все целые числа от 20 до 35; б) квадраты всех целых чисел от...

0 голосов
199 просмотров

Напечатать "столбиком":
а) все целые числа от 20 до 35;
б) квадраты всех целых чисел от 10 до b (значение b вводится с клавиатуры; b >(или равно)10);
в) третьи степени всех целых чисел от a до 50 ( значение а вводится с клавиатуры; а<(или равно) 50);<br> г) все целые числа от а до b( значение а и b вводятся с клавиатуры; b>(или равно) а).


Информатика (101 баллов) | 199 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

PascalABC.NET 3.3, эти строчки надо вставить между begin и end.

1. 20.To(35).Print(Chr(10));
2. 10.To(ReadInteger).Select(x -> x*x).Print(Chr(10));
3. ReadInteger.To(50).Select(x -> x*x*x).Print(Chr(10));
4. ReadInteger.To(ReadInteger).Print(Chr(10));

a.to(b) возвращает последовательность чисел от a до b, Select позволяет получить новую последовательность из старой (например, x -> x*x из x делает x в квадрате, то есть это функция, возводящая число в квадрат), Print(delim) выводит элементы последовательности с разделителем delim, chr(10) - символ перевода строки.

(148k баллов)