Паскаль. найти сумму квадратов всех целых чисел от - вопрос №963733910 от ПрохладныйВетер 19.12.2021 15:48

Question

Информатика: Паскаль. найти сумму квадратов всех целых чисел от —10 до в (значение в вводится с клавиатуры; в 10)

ПрохладныйВетер · Answer

var i,B,s:integer; begin write( Введите число B: ); readln (B); for i:=10 downto B do s:=s+i*i; writeln ( Сумма квадратов всех целых чисел от 10 до ,B, : ,s) end....

Паскаль. найти сумму квадратов всех целых чисел от —10 до в (значение в вводится с клавиатуры; в< 10)