Полный набор символов определенного начертания, включая прописные и строчные буквы, знаки пропитания, специальные символы, цифры и знаки арифметических действий называется: ?

называется шрифт,это элементарно

#include "math.h"
#include <iostream>
using namespace std;
int main()
{
//объявление переменных
float xa, ya, xb, yb, ab ;
//ввод переменных 
cout<<"Vvedite xa: "<<endl;
cin>>xa;
cout<<"Vvedite ya: "<<endl;
cin>>ya;
cout<<"Vvedite xb: "<<endl;
cin>>xb;
cout<<"Vvedite yb: "<<endl;
cin>>yb;
//расчет длинны отрезка
ab=sqrt(pow(xa-xb,2)+pow(ya-yb,2);
//вывод длины отрезка
cout<<"|AB| = "<<ab<<endl;
system("pause");
return 0;
}

PascalABC.Net
var
  x,y,z:integer;
  m:single;
begin
  Write('Введите x,y,z: '); Read(x,y,z);
  m:=(max(max(3*x,y*z-x),z+x)+6*z)/(-5*min(x,z));
  Writeln(m)
end.

Тестовое решение:
Введите x,y,z: 3 6 -2
-0.3

Borland Pascal 7.01
uses Crt;
function max(m,n:integer):integer;
begin if m>n then max:=m else max:=n end;
function min(m,n:integer):integer;
begin if m<n then min:=m else min:=n end;
var
  x,y,z:integer;
  m:real;
begin
  ClrScr;
  Write('Введите x,y,z: '); Read(x,y,z);
  m:=(max(max(3*x,y*z-x),z+x)+6*z)/(-5*min(x,z));
  Writeln(m);
  ReadKey
end.

Тестовое решение:
Введите x,y,z: 3 6 -2
-3.0000000000E-01