Определить число n, при котором сумма квадратов натурального ряда чисел от 1 до n не превысит величину K

@zdorovkakbyk · Регистрация: 11.04.2013

Author24 — интернет-сервис помощи студентам

Определить число n, при котором сумма квадратов натурального ряда чисел от 1 до n не превысит величину K, введенную с клавиатуры

@Slim86r · 22.05.2013, 14:17

Pascal

program sum_sq;  {Сумма квадратов натурального ряда }
 uses crt;
 var k, s, n : integer;
 begin
  clrscr ;  writeln( 'Введите K' );  readln (k);   
  s:=0;  n:=1;
  repeat
  s :=s+n*n;   n := n+1;
  until  s > k;
  writeln  ('N= ', n : 3,  '   s= ' ,  s : 5 );
 end.

@zdorovkakbyk 1 / 1 / 0 Регистрация: 11.04.2013 Сообщений: 45
		1
	Определить число n, при котором сумма квадратов натурального ряда чисел от 1 до n не превысит величину K 22.05.2013, 14:12. Показов 3410. Ответов 1 Метки нет (Все метки) Определить число n, при котором сумма квадратов натурального ряда чисел от 1 до n не превысит величину K, введенную с клавиатуры 0

	22.05.2013, 14:17

Определить число n, при котором сумма квадратов натурального ряда чисел от 1 до n не превысит величину K

Решение