Предмет: Информатика, автор: FredRaches

Напечатать столбиком все целые числа от 1 до к (к>2).
Найти сумму квадратов всех целых чисел от 10 до 50.
PascalABC

Ответы

Автор ответа: KnowsUser1
0

Ответ:

PascalABC.NET 3.5.1.2290 + .NET Framework 4.7.1

#1

begin

 Range(1, ReadInteger('k = ')).PrintLines;

end.

#2

begin

 Range(10, 50).Select(p -> p ** 2).PrintLines;

end.

Интересные вопросы
Предмет: Русский язык, автор: Ульяшка19997

Срочно помогите сжать текс 

Человек совершил проступок или даже преступление. Или просто не оправдал надежд, которые на него возлагали. Ищут объяснений. Ищет их и он сам. Чаще не столько объяснения, сколько оправдания. Окружающие и он сам винят семью, школу, коллектив, обстоятельства.

Не следует забывать, какую роль в своей собственной судьбе играет сам человек. Забывать о важной, а может быть, важнейшей части воспитания – самовоспитании. Ведь из всех обстоятельств, формирующих человека, важнейшее – сознательное отношение к собственной жизни, к собственным мыслям и планам и прежде всего – к собственным действиям.

Самовоспитание начинается с самооценки. Если человек начинает находить в каждом деле непреодолимые препятствия, теряет уверенность в себе, значит, у него формируется заниженная самооценка. Не менее опасна и завышенная самооценка, когда человек считает себя всегда и во всём правым и не прислушивается к мнению других. Только умение адекватно оценивать свои возможности позволяет правильно сформулировать жизненные цели и добиваться их. (По С. Львову.) 140 слов.