Нужно сделать программу в поскале чтобы решить уравнение

/*VS C++*/
#include <iostream>
using namespace std;
int main()
{
    setlocale(LC_ALL, "");
    float x, y, z, m;
    cout << "Введите 3 числа через пробел: ";
    cin >> x >> y >> z;
    float min = x - y;
    float max = y;
    if (y > max) max = y;
    if (z > max) max = z;
    if (y - z < min) min = y - z;
    if (x - z < min) min = x - z;
    m = max / min;
    printf("m = %.1f", m);
    cout << endl;
    system("pause");
    return 0;
}

//C
//
#include <stdio.h>
int main()
{
    float x, y, z, m;
    scanf("%f%f%f", &x,&y,&z);
    float min = x - y;
    float max = y;
    if (y > max) max = y;
    if (z > max) max = z;
    if (y - z < min) min = y - z;
    if (x - z < min) min = x - z;
    m = max / min;
    printf("m = %.1f", m);
    printf("\n");
    return 0;
}

#include <iostream> 
#include <sstream> 
#include <vector> 
#include <string> 
using namespace std; 
 
int main() {
    cout << "string:  "; 
    string s; 
    getline(cin, s); 
    istringstream ss(s); 
    vector<string> v; 
    while (ss >> s) v.push_back(s); 
    int j=v.size()-1; 
    for (int i=j; i>=0; i--)
    cout<<v[i]<<" "; 
    cout<<endl;
    system("pause"); 
    return 0; 
}

ввод - вывод

string: one two three four fife 
fife four three two one