Var x: integer; begin
x:= 1000;
while x>0 do begin
write (x, '-7=');
x:= x-7
writeln(x);
delay(50);
end;
end.
Встречено 'writeln', а ожидалось ';' , как пофиксить
x:= 1000;
while x>0 do begin
write (x, '-7=');
x:= x-7
writeln(x);
delay(50);
end;
end.
Встречено 'writeln', а ожидалось ';' , как пофиксить
More Questions From This User See All