Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Вычислить значение функции https://www.cyberforum.ru/ pascalabc/ thread2108925.html Написать по этой формуле программу в Паскале. F=m!+\sqrt{n!}	Pascal ABC Через процедуры вывести матрицу Через процедуры вывести матрицу, в которой к каждому элементу прибавили максимальный элемент
Pascal ABC Рандомно сгенерировать две [3,12]-целочисленные матрицы 7х7 матрицы https://www.cyberforum.ru/ pascalabc/ thread2108873.html Cлучайным образом сгенерировать две -целочисленные матрицы 7х7 матрицы и поменять местами строки с наибольшей и наименьшей суммой элементов. После, вывести на экран обе матрицы.	Pascal ABC Произвести действия с массивом В одномерном массиве, состоящем из n вещественных элементов, вычислить: 1)номер максимального по модулю элемента массива; 2) сумму элементов массива, расположенных после первого положительного элемента. Преобразовать массив таким образом, чтобы сначала располагались все элементы, целая часть которых лежит в интервале , а потом - все остальные. ПРОШУ ВАС! https://www.cyberforum.ru/ pascalabc/ thread2108868.html
Вычислить значение величины Pascal ABC Как тут делать, сначала for, потом в него вкладывается if? Вычислить значение величины S=\sum_{i=1}^{20}f^2(i) где	Pascal ABC Улитка поднимается на дерево след. образом: за первую минуту она проползает 50 см, за вторую 49 см, за третью 48, т.е. з Улитка поднимается на дерево след. образом: за первую минуту она проползает 50 см, за вторую 49 см, за третью 48, т.е. за каждую последующую минуту улитка проползает на 1 см меньше, чем за предыдущую. Определить и выдать на экран за сколько минут улитка проползет N см. https://www.cyberforum.ru/ pascalabc/ thread2108730.html
Pascal ABC Строковые функции https://www.cyberforum.ru/ pascalabc/ thread2108721.html Дано число. Есть ли в сумме цифр числа цифры, входящие в это число. 2652->Сумма=15->есть	Описать процедуру, вычисляющую по стороне a куба его объём Pascal ABC Описать процедуру CubeV(a, V), вычисляющую по стороне a куба его объем V = a3 (a — входной, V— выходной параметры; все параметры являются вещественными).
Pascal ABC Найти сумму цифр целой и дробной части числа Найти сумму цифр целой и дробной части числа. 123,35->6 и 8 https://www.cyberforum.ru/ pascalabc/ thread2108718.html	Pascal ABC Задана целочисленная матрица размером N×M. Заменить все отрицательные элементы матрицы на нули https://www.cyberforum.ru/ pascalabc/ thread2108709.html Задана целочисленная матрица размером N×M. Заменить все отрицательные элементы матрицы на нули.
Pascal ABC Найти максимальный и минимальный элементы матрицы, вывести их значения и их позиции (строка и столбец) Найти максимальный и минимальный элементы матрицы, вывести их значения и их позиции (строка и столбец).	Pascal ABC Описать функцию, находящую корень линейного уравнения https://www.cyberforum.ru/ pascalabc/ thread2108703.html Описать функцию Roots(A, B, C), находящую корень линейного уравнения AX+B=C (A, B, C —вещественные параметры, A <> 0).

AndrewBeletskiy

35 / 35 / 45

Регистрация: 26.10.2016

Сообщений: 85

23.10.2017, 17:41

Игра в мяч. - Pascal ABC - Ответ 11645863

23.10.2017, 17:41. Показов 5081. Ответов 1

Метки (Все метки)

Сообщение было отмечено Kirsach как решение

Решение

Pascal

Program pr;
 
var n:integer;
    a:integer;
    m:longint;
    k: array [1..1001] of integer;
    
procedure input();
var i: integer;
begin
    readln(n, a, m);
    for i:=1 to n do
    begin
        read(k[i]);
    end;
end;
function next(current: integer): integer;
begin
    next := k[current];
end;
procedure output();
var i: longint;
    current: integer;
begin
    current := a;
    for i:=1 to m do
    begin
        current := next(current);
    end;
    writeln(current);
end;
 
BEGIN
    input();
    output();
END.

Вернуться к обсуждению:
Игра в мяч. Pascal ABC

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

23.10.2017, 17:41

Готовые ответы и решения:

Игра «Отбей мяч»
Изобразить игровое поле, где будет двигаться мяч по произвольной траектории, а внизу должна...

Игра, где мяч нужно отбить блоком
:) Здравствуйте! Подскажите пожалуйста, Тренируюсь сделать что-то на подобии игры небольшой для...

Игра с Мячом - Мяч пролетает указанные точки чуть дальше
Ошибки программы опишу ниже этого кода, но прежде вставьте этот код в PascalABC.NET и посмотрите...

Пожалуйста! Игра "Мост". Дан мост с арками разной ширины, в нижней строке экрана расположен мяч, которым можно
Игра "Мост". Дан мост с арками разной ширины, в нижней строке экрана расположен мяч, которым можно...

	23.10.2017, 17:41

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

23.10.2017, 17:41

Помогаю со студенческими работами здесь

Скачущий мяч
Нужна анимация прыгающего на плоскости мяча:)

Прыгающий мяч
Как изобразить прыгающий мяч. Мяч падает вниз с высоты. Показать эффект отскока мячика на меньшую...

мяч в vba
Изобразить движение футбольного мяча после удара (задается начальное положение мяча и вектор...

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

Наверх