Условный оператор

@Eliah · Регистрация: 25.11.2010

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

Заданы площади круга R и квадрата S. Определить, поместится ли квадрат в круге. Задачу решить при следующих значениях: 1) R = 70, S = 36,74; 2) R = 0,86, S = 0,64.

@Elstan · 25.11.2010, 18:44

Pascal

var skruga,skvadrata,R,A:real;
begin
writeln('ploscha kruga=');
readln(skruga);
writeln('ploscha kvadrata=');
readln(skvadrata);
R:=sqrt(skruga/3.14);
A:=sqrt(skvadrata);
if R<=A then writeln('Krug pomest v kvadrate')
        else writeln('Krug ne pomest v kvadrate');
end.

@Dekio · 25.11.2010, 18:51

Определить, поместится ли квадрат в круге.

тогда надо

Pascal

var skruga,skvadrata,R,A:real;
begin
writeln('ploscha kruga=');
readln(skruga);
writeln('ploscha kvadrata=');
readln(skvadrata);
R:=sqrt(skruga/3.14);
A:=sqrt(skvadrata);
if R>=A then writeln('kvadrat pomest v kruge')
        else writeln('kvadrat ne pomest v kruge');
end.

@Eliah 0 / 0 / 0 Регистрация: 25.11.2010 Сообщений: 14
		1
	Условный оператор 25.11.2010, 18:40. Показов 1335. Ответов 2 Метки нет (Все метки) Заданы площади круга R и квадрата S. Определить, поместится ли квадрат в круге. Задачу решить при следующих значениях: 1) R = 70, S = 36,74; 2) R = 0,86, S = 0,64. 0

	25.11.2010, 18:51

Опции темы

Условный оператор

Решение