gennadevna
?>

информатика 8 класс напишите программу "Сумма чисел от 10 до 20 с шагом 0, 1" в Паскале . Заранее благодарю ​

Информатика

Ответы

kapi30

Объяснение:

var

a:real = 10;

b:real = 10;

begin

 while b < 20 do

 begin

   b:= b + 0.1;

   a:= a + b;

 end;

 write(a);

end.

rakitinat8
Чертёж дан во вложении.
Пусть ΔABC - равнобедренный, АВ = с - его основание, АС = ВС = b - боковые стороны. По условию треугольник симметричен относительно горизонтальной оси, так что его основание АВ должно быть перпендикулярно горизонтальной оси и при этом АО = ОВ, а вершина С попадет на горизонтальную ось. Разместим ΔABC так, чтобы основание попало на вертикальную ось.
Окружность, описанная вокруг треугольника, пройдет через все три его вершины. Точка М - центр описанной окружности, - лежит на пересечении перпендикуляров, проведенных из середин сторон треугольника. Поскольку ΔABC равнобедренный, то ОС - его высота и отрезок МС, равный радиусу окружности R, также лежит на горизонтальной оси.
Найдем высоту ОС, обозначив её через h, по теореме Пифагора.
ОС - это катет ΔAOC, AO ⊥ OC.
\displaystyle h= \sqrt{AC^2-AO^2}= \sqrt{b^2-\left(\frac{c}{2}\right)^2}
Площадь ΔABC находим по формуле
\displaystyle S= \frac{1}{2}\cdot AB \cdot OC = \frac{1}{2}hc
Для нахождения радиуса R = MC рассмотрим прямоугольные ΔAOC и ΔMDC, имеющие общий угол АСО = α
\displaystyle \cos \alpha= \frac{OC}{AC}= \frac{CD}{MC} \to MC= \frac{AC\cdot CD}{OC}; \\ R= \frac{b\cdot \displaystyle \frac{b}{2}}{h} = \frac{b^2}{2h}; \qquad OM=h-R
Теперь легко сделать необходимое построение.
Для этого откладываем от начала координат по горизонтальной оси отрезок ОМ и проводим из него, как из центра, окружность радиуса R. Соединяем между собой три точки пересечения окружностью осей координат и получаем треугольник с длинами сторон, равными заданным.

Ниже приводится программа на языке Microsoft QBasic, позволяющая рассчитать длину отрезка ОМ (Mx - координату х точки М) и радиус описанной окружности R по заданной длине основания с и длине боковой стороны b.

INPUT "Основание: ", c
INPUT "Боковая сторона: ", b
h = SQR(b ^ 2 - (c / 2) ^ 2)
R = b ^ 2 / (2 * h)
Mx = h - R
PRINT "Радиус равен "; R, "Координата центра равна "; Mx

Тестовое решение:
Y:\qbasic>QBASIC.EXE
Основание: 6
Боковая сторона: 5
Радиус равен  3.125         Координата центра равна  .875

Чтобы продолжить, нажмите любую клавишу

(qbasic) построить равнобедренный треугольник симметричный относительно горизонтальной оси, задать е
whiskyandcola

Номер 1

На каникулах мы пойдем в театр или в цирк

Пусть А- поход в театр, B - в цирк

F = A∨B

15 делится на 3 и на 5

Пусть А- 15 делится на 3, B - 15 делится на 5

F= A∧B

Если сумма цифр числа делится на 3 без остатка, то число делится на 3

Пусть А - число делится на 3 без остатка, B - число делится на 3

F= A⇒B

Номер 2

Высказывание A∨B дает объединение множеств A и B. Обозначим истинность выражения за 1, а ложь за 0

Получается, если A = 0, B=0 A∨B - ложно

A=0, B=1  A∨B - истинно

A=1, B=0  A∨B - истинно

A=1, B=1  A∨B - истинно

Номер 3

Действия выполняются сначала в первой скобке

((1∨0)∨1)∨0)= (1∨1)∨0=1∨0=1 (т.к 1∨0 или 0∨1 всегда истинно(=1))

Номер 4

Высказывание A={3=6}. Это ложное высказывание, т.к 3≠6. Т.е А=0

Высказывание B={2<3}. Это истинное высказывание, т.к 2<3. Т.е B=1

Высказывание C={4<1}. Это ложное высказывание, т.к 4>1. Т.е C=0

Перепишем высказывание из задания и подставим в него найденные значения:

(0∨¬1)∧¬(¬0∨1)

Как известно ¬0=1, ¬1=0 (отрицание) ⇒ (0∨0)∧¬(1∨1) = 0∧¬1=0∧0=0

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

информатика 8 класс напишите программу "Сумма чисел от 10 до 20 с шагом 0, 1" в Паскале . Заранее благодарю ​
Ваше имя (никнейм)*
Email*
Комментарий*

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

Olga1233
evainvest1
leobashkurov1089
aaltuxova16
mvolkov8
s9152992722344
Екатерина15
krasnobaevdj3
denisdenisov63
isaev
R7981827791127
shangina1997507
mariya
magnit-expo
janepustu