Пожалуйста помогите написать программу в паскале!!!!!!! Даны радиус круга и сторона квадрата. Проверьте, пройдет ли круг в квадрат?
10-11 класс
|
var r,a:real;
begin
readln(r,a);
if 2*r<a then writeln('proidet') else writeln('ne proidet');
end.
Другие вопросы из категории
последовательностью; если нет то увеличить число в 2 раза
Читайте также
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу
2.написать программу в паскале
f(x)=2(sin*sin)x+1
увеличить в 3 раза. Вывести на экран монитора первоначальный и преобразованный массивы в строчку.
Пожалуйста, помогите написать программу в Паскале.
n, массив P и радиусы r1, r2 /* Исходные данные */
вывести заголовок задачи и значения n, P, r1, r2 k ¬0 для i от 1 до n шаг 1 выполнять/*
Подсчитать число точек */ если r1 < ri и ri < r2 то k ¬k +1
конец-если
конец-цикл
вывести заголовки выходных данных и значений k конец
Теперь спланируем тестирование.
Проверку программы выполним при следующих исходных данных.
Зададим число точек на плоскости: n = 10. Подберем расстояния и радиусы: 0.03 21.0 12.89 7.41 99.99
P = 12.34 56.78 90.98 7.6 0.54
r1 = 12.35 r2 = 56.90.
Выходные данные в этой задаче будут иметь вид: Мишень Исходные данные:
n= 10 Массив P[n]: 0.03 21.0 12.89 7.41 99.99 12.34 56.78 90.98 7.6 0.54 r1 = 12.35 r2 = 56.90
Ответ: внутри 3 точки (три точки находятся внутри кольца).помогите написать программа в паскале и алгоритм блок-схему.пожалуйста срочно!
минимальным элементами массива (включая их)