Паскаль. найти сумму квадратов всех целых чисел - вопрос №963824110 от ZheniaBabich 11.11.2022 01:53

Question

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

ZheniaBabich · 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)