Здравствуйте решить задачу по алгоритмике (цифровое ГТО , задача №16) . Необходимо создать алгоритм который пройдет путь из одной точки в другую за 4 шагов.
Задача на линейную динамику. Требуется построить таблицу, которая покажет, сколько получить из числа 1 каждое число до 30. При этом учесть, что траекторий проходит через 14. Все числа после 14, должны быть получены из него. Отсюда и получается, что получить нечетное число большее 14 нет. А кол-вол получить четные числа большие 14 и меньшие 28 равны кол-ву получить число 14. Кол-во получить число 28 удваивается, потому что число 28 можно получить как из 26, так и из 14.
begin Writeln('Вводите длины сторон четырехугольника через пробел'); for i:=1 to n do begin Write(i,': '); Read(a,b,c,d); P[i]:=a+b+c+d; end; k:=0; for i:=n-1 downto 1 do if P[i]=P[n] then k:=k+1; Writeln('Четырехугольников с периметром, как у последнего: ',k) end.
Пример Вводите длины сторон четырехугольника через пробел 1: 5 7 3 8 2: 3 7 3 6 3: 5 8 5 2 4: 6 8 4 1.9 5: 8 3 5 9 6: 7 3 7 2 7: 5 5 5 4 Четырехугольников с периметром, как у последнего: 2
20
Объяснение:
Задача на линейную динамику. Требуется построить таблицу, которая покажет, сколько получить из числа 1 каждое число до 30. При этом учесть, что траекторий проходит через 14. Все числа после 14, должны быть получены из него. Отсюда и получается, что получить нечетное число большее 14 нет. А кол-вол получить четные числа большие 14 и меньшие 28 равны кол-ву получить число 14. Кол-во получить число 28 удваивается, потому что число 28 можно получить как из 26, так и из 14.
Таблицу прикрепил.
n=7;
type
V=array[1..n] of real;
var
P:V;
i,k:integer;
a,b,c,d:real;
begin
Writeln('Вводите длины сторон четырехугольника через пробел');
for i:=1 to n do begin
Write(i,': '); Read(a,b,c,d);
P[i]:=a+b+c+d;
end;
k:=0;
for i:=n-1 downto 1 do
if P[i]=P[n] then k:=k+1;
Writeln('Четырехугольников с периметром, как у последнего: ',k)
end.
Пример
Вводите длины сторон четырехугольника через пробел
1: 5 7 3 8
2: 3 7 3 6
3: 5 8 5 2
4: 6 8 4 1.9
5: 8 3 5 9
6: 7 3 7 2
7: 5 5 5 4
Четырехугольников с периметром, как у последнего: 2