1. Информатика
  2. Информатика 9 класс Паскаль Составьте

Информатика 9 класс Паскаль
Составьте программу на языке программирования, определяющую, может ли быть окружность вписана в квадрат.
Пояснение: с клавиатуры вводятся радиус окружности и длина стороны квадрата, в результате должен выводиться ответ ДА или НЕТ.​

Nikitosqwerty Nikitosqwerty    1   15.04.2020 08:24    0

Ответы
Vados2002k Vados2002k  06.08.2020 22:58

var r,a: integer;

begin

write('Введите радиус окружности: ');

readln(r);

write('Введите сторону квадрата: ');

readln(a);

if (2*r=a) then writeln('ДА')

else writeln('НЕТ');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
НастяМосква13 НастяМосква13  12.05.2021 13:34
Кужаттын такырыптар тизиминен куралган болими а)СОЙЛЕМ б)мазмун в)силтемелер д)атаулар...
2006Крис 2006Крис  12.05.2021 13:35
Определите, что отмечается подобным значком * общественное достояниеДокументы, защищенные авторским правомпроизведения, распространяемые бесплатно​...
Танюха1410 Танюха1410  12.05.2021 13:39
Условие задания: Выбери верные ответы. Вредоносными программами являются:Черви системного блокаID спартанские программысетевые червитроянские программымухи оперативной памятиответить!​...
vladgorbatov1 vladgorbatov1  12.05.2021 13:40
Известно, что X = 250_4 + 45_5 + 15_2. Чему равно число X в десятичной системе счисления? Чему равно х в десятичной системе счисления, если х = 11010_3 + 11_8 + 11_4 + 555_8?...
milarudneva449 milarudneva449  12.05.2021 13:40
с Python Тест как можно быстрее!...
Плаоцтвтч Плаоцтвтч  06.06.2019 02:20
Сms excel рассчитать и построить график функции: f(x) = 2х^3+3х-5х^2 , где х принадлежит [0; 5], h = 0,5 решение должно быть получено в виде таблицы. распечатать таблицу в двух...
Tegebotik Tegebotik  01.07.2019 19:50
При угадывании целого числа в некотором диапазоне было получено 8 бит информации. сколько чисел содержит этот диапазон?...
пандос3 пандос3  04.12.2020 12:08
Написать программу на языке PASCAL для расчета таблицы значений заданной функции....
XyJiuGaN4uK XyJiuGaN4uK  16.09.2021 09:29
Інформацію , істотну і важливу в данний момент , називають: А)корисною , б)актуальною , в) достовірною , г) повною , д)повною...
тикимиккной тикимиккной  16.09.2021 09:30
программа Кумир: Чертёжник Нарисовать указанную фигуру. В качестве ответа на задание 1-2 нужно прислать скриншоты окна системы графического исполнителя Чертёжник с отображением...

Популярные вопросы