Помогите пожалуйста написать 2 программки на Delphi
1. Массивы
Даны действительные числа a1, a2, …an. Требуется домножить все члены последовательности a1, a2, …an на квадрат ее наименьшего члена, если ai<0, и на квадрат ее наибольшего члена, если аi>= 0 (1 < i < n).
2.Строки
Составить программу преобразования натуральных чисел, записанных в римской нумерации, в десятичную систему счисления.
Задачи нужно решить с использованием подпрограмм
Заранее всем большое спасибо!!!!!!!!!
|