М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
АnnaaaaA
АnnaaaaA
07.04.2023 00:32 •  Информатика

Pascal.(34б) если все элементы одномерного массива положительные то вывести сообщение "условие выполняется" иначе "условие не выполняется" дан массив из n элементов. определить произведение элементов кратных заданному k(k-задается с клавиатуры). дан массив из n элементов.определить произведение тех элементов,которые кратные 3.

👇
Ответ:
yanayana6
yanayana6
07.04.2023
Var k,a,b,c:integer;
begin
writeln('введите первое число');
readln(a);
writeln('введите второе число');
readln(b);
writeln('введите третье число');
readln(c);
writeln('введите число k');
readln(k);
if a mod k = 0 then
writeln('Первое число кратно k')
else
writeln('Первое число не кратно k');
if b mod k = 0 then
writeln('Второе число кратно k')
else
writeln('Второе число не кратно k');
if c mod k = 0 then
writeln('Третье число кратно K')
else
writeln('Третье число кратно k');
end.
Это первая задача!
4,8(77 оценок)
Открыть все ответы
Ответ:
ksubol777
ksubol777
07.04.2023
Пример на c#:
int a;
int b;
int c;
int d;
Console.WriteLine("Введите стоимость перчаток");
a = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите стоимость портфеля");
b = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите стоимость галстука");
c = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите сумму, которую вы даете продавцу");
d = Convert.ToInt32(Console.ReadLine());
int result;
int sdacha;
result = a + b + c;
if (result <= d)
{
sdacha = d - result;
Console.WriteLine("Ваша сдача - {0}", sdacha);
}
if (result > d)
{
Console.WriteLine("Вам нужно доплатить");
}
Console.ReadKey();
4,8(73 оценок)
Ответ:
nikitos22813371
nikitos22813371
07.04.2023

Горизонтальная съемка местности в простейшем варианте выполняется с теодолита и рулетки. Съемочное обоснование обычно создают проложением теодолитных ходов. Если участок съемки имеет вытянутую форму, то теодолитный ход прокладывают по его оси; при этом отдельные пункты съемочного обоснования можно определять из геодезических засечек. Если участок имеет овальную форму, то прокладывают замкнутый ход по его границе; внутри участка можно проложить диагональные ходы.

При горизонтальной съемке положение отдельных точек определяют относительно пунктов съемочного обоснования и линий, соединяющих их, применяя засечек (угловых, линейных, комбинированных);

- полярный перпендикуляров створов.

Широко также применяется обмеров зданий и сооружений и расстояний между ними с рулетки засечек. При угловой засечке положение точки 1 определяют относительно двух пунктов съемочного обоснования А и В с двух измеренных горизонтальных углов α1 и β1. Положение другой точки - точки 2 определяют, измеряя два других угла α2 и β2 (рис.7.3). Результаты измерений записывают в журнал.

 

Рис.7.3                                            Рис.7.4

При построении плана при точках А и В с транспортира строят углы α1 и β1 и в пересечении линий получают изображение точки 1 на плане. Аналогично находят на плане положение точки 2.

Если расстояние до точки 1 не превышает длины рулетки, положение точки 1 определяют линейной засечкой, при которой измеряют расстояния А - 1 и В - 1 ; при построении плана из точки А проводят дугу радиусом, равным расстоянию А - 1 в масштабе плана, а из точки В - радиусом, равным расстоянию В - 1 в масштабе плана. Точка пересечения этих дуг является изображением точки 1 на плане.

Точность измерения горизонтальных углов при угловой засечке определяется точностью их построения на плане транспортиром,т.е. порядка 10' - 15'. Допустимую ошибку измерения расстояний при линейной засечке рассчитывают по формуле:

ms = 0,3 мм * М,

где М - знаменатель масштаба съемки.

Полярный Полярный съемки - это реализация полярной системы координат. Теодолит устанавливают на пункте съемочного обоснования А, принимая его за начало ( полюс ) местной полярной системы координат. Полярная ось совмещается с направлением на другой пункт съемочного обоснования В. Затем измеряют горизонтальный угол β1, образованный направлением АВ и направлением на снимаемую точку 1, и расстояние S1 от точки А до точки 1 (рис.7.4). При построении плана положение точки 1 получают, откладывая на стороне угла β1, построенного транспортиром, расстояние S1 в масштабе плана.

Рассчитаем среднюю квадратическую ошибку измерения углов и расстояний при полярном съемки, если ошибка положения точки 1 задана и равна Мp.

В полярной системе координат ошибка положение точки выражается формулой:

                      (7.1)

где mβ - ошибка измерения угла β; ms - ошибка измерения полярного расстояния.

По принципу равных влияний имеем:

m2s = ( S * mβ/ )2 = M2 /2,                      (7.2)

откуда

      и                            (7.3)

Пусть масштаб съемки 1:М=1:2 000, тогда Мp=0.5 мм * 2 000=1 м. При S=100 м вычисления по формулам (7.3) дают mβ=24', ms =0.7м перпендикуляров перпендикуляров является реализацией обычной прямоугольной системы координат. Пусть линия АВ - одна из сторон теодолитного хода. Примем ее за ось l, начало координат совместим с пунктом А; ось d расположим перпендикулярно линии АВ. Положение точки 1 определяется двумя перпендикулярами l1 и d1 (рис.7.5), длины которых измеряют мерной лентой или рулеткой.

4,5(90 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ