Как освободить память на диске c, если он заполнен?

Question

Информатика: Как освободить память на диске c, если он заполнен?

mankoyana · Accepted Answer

Program R_BP;Uses crt;Var r,a,b,c,d:real;beginclrscr;write( 'Введите через "Enter" 4 числа ');read(a,b,c,d);r:=(a+b+c+d)/4;writeln('ответ ',r);end.
2 задача Program R_BP;Uses crt;Var r,a,b,c,d:real;beginclrscr;write( 'Введите ваш рост');read(a);writeln('Введите ваш вес ');readln(R);writeln('Ваш вес = ',r,' ваш ростс = ',a);end;
var a,b,c,d:integer; x:real; begin write('Введите a,b,c: '); readln(a,b,c); //Дискриминант d:=sqr(b)-4*a*c; if d<0 Then writeln('Не имеет смысла') else if d=0 Then begin x:=-b/(2*a); writeln(x); end else begin x:= (-b + sqrt(D))/(2*a); writeln(x); x:= (-b - sqrt(D))/(2*a); writeln(x); end; end.

MOGZ ответил