function Find<T>(self: array of T; p: T->boolean): T; extensionmethod; Выполняет поиск первого элемента в массиве, удовлетворяющего предикату. Если не найден, возвращается нулевое значение соответствующего типа
Теперь переведем это на общепонятный язык. Во-первых, не существует процедуры Find в языке PascalABC.NET. Во-вторых, имеется функция Find, реализующая так называемое расширение, т.е. которая в тексте программы следует непосредственно за точкой. Если имеется одномерный массив А, содержащий элементы некоторого типа, то конструкция A.Find(лямбда-выражение типа boolean) позволяет найти в массиве А первый в порядке следования элемент, подстановка значения которого в лямбда-выражение сделает это выражение истинным. Не знаете, что такое лямбда-выражение? Ну что же, я не могу в ответе рассказывать теорию "лямбд", да и вопрос был не об этом.
#include <iostream>
#include <Windows.h>
using namespace std;
void main()
{
setlocale(LC_ALL, "Russian");
float a, b, c;
Start:
system("CLS");
cout << "Введите 3 действительных числа:\n";
cin >> a;
cin >> b;
cin >> c;
if (a>b && a>c)
cout << "Вот что получится если удвоить ваши числа: " <<a*2<< b*2<<c*2<<"\n";
else
cout << "Заменяю ваши числа обсолютными значениями: " <<abs(a)<<abs(b)<<abs(c)<< "\n";
Sleep(5000);
goto Start;
}