Найдите количество точек с целочисленными координатами, попадающих в круг радиуса R.

@Klark73 · Регистрация: 30.03.2011

Найдите количество точек с целочисленными координатами, попадающих в круг радиуса R.(операторы цикла)

@marshal · 18.04.2011, 18:42

Pascal

var i,r,s:integer;
begin
writeln('введите радиус');
readln(r);
for i:=1 to 360 do
s:=s+r;
writeln(s);
end.

Типо так

@Klark73 2 / 2 / 0 Регистрация: 30.03.2011 Сообщений: 66
		1
	Найдите количество точек с целочисленными координатами, попадающих в круг радиуса R. 18.04.2011, 18:37. Показов 1755. Ответов 1 Метки нет (Все метки) Найдите количество точек с целочисленными координатами, попадающих в круг радиуса R.(операторы цикла) 0

Опции темы

Решение