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

Принцип домино. Имеется ряд, состоящий из вертикально стоящих костяшек домино разного размера. Для каждой из костяшек известна ее высота hi и расстояние до следующей костяшки li. Толщина костяшки считается пренебрежимо малой. Первую костяшку толкают, и она падает в сторону второй костяшки. Падение происходит без проскальзывания, то есть нижний край костяшки остается на том же месте. Если костяшка при падении

задевает другую костяшку (или хотя бы касается ее), это приводит к тому, что дальше будут падать

обе эти костяшки. Необходимо выяснить, сколько всего костяшек упадет.

Входные данные. В первой строке задается натуральное число N (1 < N < 2 ■ 105), определяющее

общее количество костяшек. Во второй строке задается N чисел, определяющих высоты соответствующих костяшек. В третьей строке задается N — 1 число, i-ое из этих чисел определяет расстояние

между i-й и (i + 1)-й костяшкой. Все числа натуральные и не превосходят 109.

Выходные данные. Выведите одно число - количество костяшек, которые упадут после толчка первой

костяшки.

Примеры входных и выходных данных

Ввод ,,,вывод

4 .4

1234

121

3 2

567

48

👇
Открыть все ответы
Ответ:
Dalishka808
Dalishka808
11.01.2023

Чтобы наш снаряд (пуля, мяч или что-то еще) попало в цель, нужно чтобы высота подъема снаряда совпала с высотой, на которой расположена цель, и чтобы дальность полета совпала с заданным расстоянием. Иначе снаряд может улететь выше или ниже цели или не долетать.

Воспользуемся формулами по равнозамедленному движению.


program zadacha;

const

g=9.8;

var

h,L,a,V,S,h1:real;

begin

writeln('vvedite visotu i dalnost celi');

readln(h,L);

writeln('vvedite ugol, skorost snariada');

readln(a,V);

a:=a*pi/180;

h1:=int(( sqr(V)* sqr(sin(a))) / (2*g));

S:=int((sqr(V)*sin(2*a))/g);

if (S=L) and (h1=h) then writeln('popal') else writeln('ne popal');

end.


Напишите программу на паскале,которая будет сообщать можно ли попасть в цель находящая на заданном р
Напишите программу на паскале,которая будет сообщать можно ли попасть в цель находящая на заданном р
4,7(88 оценок)
Ответ:
kdjdjd1Dndnd
kdjdjd1Dndnd
11.01.2023
Решение со смещением всех последующих элементов. 

program znanija;
const n = 21; // N + 1
var 
a:array[1..n] of integer;
m, i:integer;
begin

write('Введите позицию для вставки: ');
readln(m);

if (m<1) or (m>n-1) then
begin 
writeln('Недопустимое значение m'); 
exit;
end;

write('Массив до вставки: ');
for i := 1 to n-1 do
begin 
a[i] := random(100); 
write(a[i], ' '); 
end;

writeln();
for i := n - 1 downto m do // Смещение
a[i+1] := a[i]; 
  
a[m] := 10;  // Вставка

write('Массив после вставки: ');
for i := 1 to n do 
write(a[i], ' ');
end.
4,5(29 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ