|
|
|
|
ЛАБОРАТОРНАЯ №1 ВАРИАНТ 9
| Задача:
Даны окружность и квадрат. Проверить, можно ли квадрат вписать в окружность. С клавиатуры вводится радиус окружности R и площадь квадрата S. Результат вы водится на экран в удобном для восприятия виде.
|
| Решение: |
| > > Скачать< < |
program task9;
var r,s:real;
begin
r:=0;
s:=0;
writeln('VVEDITE R i S');
readln(r,s);
if r=sqrt(s/2) then writeln('kvadrat moghno vpisat v okrughnost')
else writeln('kvadrat nelzya vpisat v okrughnost');
readln;
end.
|
|
| |
