В ошибке сказано, что драйверы на устройство от Nvidia повреждены/неправильно установлены или устарели. Обнови их и посмотри, что будет.
Program znanija;
var count, key, pass:integer;
begin
pass:=1234;
while count <= 3 do begin
Inc(count);
readln(key);
if key = pass then
count:=5
else
writeln('Попробуйте снова');
end;
end.
Var a,b,c:real;
begin
write('a = '); readln(a);
write('b = '); readln(b);
c:=a*b/(a*a)+b*b+1;
writeln('c = ',c);
end.
Пример:
a = 2
b = 5
c = 28.5