Записи с меткой «Pascal»

Решаем задачи Абрамян на Паскале. Array135

Array135. Даны множества $$A$$ и $$B$$, состоящие соответственно из $$N_1$$ и $$N_2$$ точек (точки заданы своими координатами $$x$$, $$y$$). Найти минимальное расстояние между точками этих множеств и сами точки, расположенные на этом расстоянии (вначале выводится точка из множества $$A$$, затем точка из множества $$B$$).

Решаем задачи Абрамян на Паскале. File12

File12. Дан файл целых чисел. Создать два новых файла, первый из которых содержит четные числа из исходного файла, а второй — нечетные (в том же порядке). Если четные или нечетные числа в исходном файле отсутствуют, то соответствующий результирующий файл оставить пустым.

Решаем задачи Абрамян на Паскале. Array134

Array134. Дано множество $$A$$ из $$N$$ точек (точки заданы своими координатами $$x$$, $$y$$). Найти пару различных точек этого множества с максимальным расстоянием между ними и само это расстояние (точки выводятся в том же порядке, в котором они перечислены при задании множества $$A$$).