Найдите ошибки и исправьте их,пожалуйста

Исправьте, пожалуйста, ошибки
Нужно вычислить A,B,C. d ввести с клавиатуры. известно, что d>0, при x=..., y=..., z=..., и d<=0, при ... так же дано, что A= , B=...

Пожалуйста, исправьте ошибки в программе
var n:integer; a:array of string; //Переменная типа string, который будет пройден в след. уроке buf: string; i,j:integer; ...

Найдите ошибки, пожалуйста
procedure Max( b: real; var bmax : real; k : integer); begin if b<0 then if k=0 then...

Исправьте ошибки
я вот вложил две програмки bulat77 и крутоо!!bulat77 вот её надо сделать!доделать!!надо её сделать как программа крутоо!!!помогите...

Исправьте ошибки
Все та же задача. Нужно составить программу которая решит данный пример. Сделал, но не могу разобраться где ошибка, помогите пожалуйста...

исправьте пожалуйста!
что я делаю неправильно? я хочу вывести рэндомно два числа три раза, а затем сумму каждой пары, но сумма выводится только последне пары. ...

Исправьте, пожалуйста
Не понимаю в чем ошибка uses crt; var f1,f2: text; st1,st2: string; M: integer; function Decod_Sctital(st: string):...

Исправьте ошибки в коде
var mas:array of real; k,n,m,q,w,s,a,b:real; i:byte; begin writeln ('vvedite razmernost massiva: '); read(n,m); q:=0; ...